package Helper; use strict; use warnings; use Exporter qw(import); our @ISA = qw(Exporter); our @EXPORT = qw(foo); sub foo { print "foo\n"; } sub bar { print "bar\n"; } 1; #### #!/usr/bin/perl use strict; use warnings; use HELPER; print "In Main\n"; foo();