Try this:

Dog.pm

package Dog {

    use strict;
    use warnings;
    use Exporter qw( import );

    our $VERSION   = 1.00;
    our @EXPORT_OK = qw( dog );

    sub dog { shift }

    1;
}
[download]

fido.pl

#!/usr/bin/env perl   

use strict;
use warnings;
use feature qw (say);
use Dog qw(dog);

say dog ("barf!");

__END__
[download]

OK, the naming is perhaps a bit unlucky - but it should work.

Regards, Karl