package After5years; require Exporter; @ISA = qw|Exporter|; @EXPORT_OK = qw|lawyer|; sub lawyer { print "Where's that pre-nuptial agreement?\n"; } 1;