#!/usr/bin/perl
use warnings;
use strict;

use MyLib qw{ verify };

verify() for 1 .. 10;

##</code><code>##

package MyLib;
use parent 'Exporter';
our @EXPORT_OK = qw{ verify };

my $counter = 1;
sub verify {
    print $counter++, "\n";
}

##</code><code>##

1
2
3
4
5
6
7
8
9
10