Help for this page

Select Code to Download

Select or download this

#! perl -slw
use strict;
...
__END__
C:\test>junk5
main : C:\test\junk5.pl : 13 : Bad() produced an error