package My::Cunning::Module; use Modern::Perl; use Exporter qw/import/; our @EXPORT_OK = qw/looper/; sub looper { #admire my cunningly crafted loop logic function ... } 1; #### use Modern::Perl; use My::Cunning::Module qw/looper/; # somewhere in your program looper($data) or die 'It did not work';