# -*-Perl-*- BEGIN { unshift @INC, 'blib/lib' } use CGI::Debug( report => 'errors' ); use strict; print "\n\n"; print "a1\n";