package MyModule;

use strict;
use warnings; # might want to turn this off once everything works fine
use Exporter;

our (@ISA, @EXPORT);
@ISA = qw(Exporter);
@EXPORT = qw(suba);

sub suba {
        print "suba\n";
}

1;

##</code><code>##

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

suba();