use Common.pm;
my $returnvalue = somesub();

##</code><code>##

sub somesub {
    ...create value...
    return($value);
}
1;

##</code><code>##

use Common.pm;
my $returnvalue = Common->somesub();

##</code><code>##

package Common;
sub somesub {
    ...create value...
    return($value);
}
1;