Select Code to Download

#!/usr/bin/perl -w
 #
...

my $string = 'no semi-colon';
print $string,"\n";

#!/usr/bin/perl -w
 ;#
...

my $string = 'semi-colon';
print $string,"\n";