package Foo;

use strict;
use warnings;

use base 'Exporter';

our $hello = \&hellosub;
our @EXPORT_OK = ( '$hello');

sub hellosub {
    my $h = shift;
    return $h;
}

print $hello->("Foo Mod init"),"\n";

1;