debian/perl-framework/t/htdocs/modules/cgi/stderr3.pl.PL


1
2
3
4
5
6
7
8

# closes stderr during script execution

print "Content-Type: text/plain\n\n";
print "this is more stdout";

close STDOUT;

print STDERR "this is a post-stdout-closure error message";