The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# -*-Perl-*-
BEGIN { unshift @INC, 'blib/lib' }
use CGI::Debug( report => 'errors', 
	    to => { file => ["/tmp/a$$","/tmp/b$$"] } );
use strict;

print "Content-type: text/html\n\n";
print "a1\n";
warn;