Select Code to Download

use strict; use warnings;
use feature qw/ say /;
...
bar
baz
qux

$ perl 1202892.pl
the last line is qux

use strict; use warnings;
use feature qw/ say /;
...
say "the last line is $last_line";

__END__

$ perl 1202892-2.pl
the last line is m