Select Code to Download

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

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

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

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