Select Code to Download

#!/usr/bin/perl
use warnings;
...
use MyLib qw{ verify };

verify() for 1 .. 10;

package MyLib;
use parent 'Exporter';
...
sub verify {
    print $counter++, "\n";
}

1
2
...
8
9
10