#!/usr/bin/perl -w
use strict;
use lib qq~./mydir~;
require qq~./code.pm~;
#use Foo;

print Foo::foo();
1;

##</code><code>##

package Foo;
use AutoLoader 'AUTOLOAD';   # import the default AUTOLOAD subroutine
 
1;

##</code><code>##

package Foo;

sub foo {
    return 'tastes so good...';
}

1;

##</code><code>##

perl code.pl
tastes so good...