package Local::Anagrams; use strict; use warnings; use Exporter 'import'; our @EXPORT_OK = qw/ get_permutations /; sub get_permutations { my $string = shift; ... return @permutations; } 1;