package one; @ISA = qw(Exporter); @EXPORT = qw(method1); sub method1 { print "method1 greets hello"; } 1; #### use one; print "its here"; method1; print "here";