# Mypackage.pm
use strict;
use warnings;
use base Exporter;

our @EXPORT = qw/mysub/;

sub mysub {
    print "It works!\n";
}

1;

##</code><code>##

#!/usr/bin/perl

# main script file.
use strict;
use warnings;
use Mypackage;

mytest();