package My::Util;

use strict;
use warnings;
use Exporter;
our @ISA = qw(Exporter);
our @EXPORT = qw( get_file_name );

exit;
sub get_file_name {
    ...
}

1;

__END__