Select Code to Download

#!/usr/bin/perl -l

use strict;
...
sub some_sub {
    warn "Got to here";
}

102
102
Got to here at 'bin/some_file.pl' line 24.