# Common.pm
package Common;

use strict;

sub foo {
	# do stuff
}

sub bar {
	# do other stuff
}
1; # have to return a non-zero value at end!

##</code><code>##

# client.pl
use  strict;

use lib('/path/to/modules/');
use Common;

Common::foo();
Common::bar();