# -*-Perl-*- BEGIN { unshift @INC, 'blib/lib' } use CGI::Debug( to => { mail => 'jonas@cpan.org' } ); use strict; print "Content-type: text/html\n\n"; print "a1\n"; priint "error";