/public_html/---+   
    |            |
    |            |
    |       calling.cgi
    |
    |
/applications/---+
                 |
                 |
              Main.pm
                 |
             Common.pm
                 |
             /Contact/--+
                        |
                        |
                    Contact.pm
            

##</code><code>##

#!/usr/local/bin/perl
use lib "/usr/home/bradcathey/applications/";
use strict;

use Contact::Contact;
print "done<br />";

##</code><code>##

#!/usr/bin/perl

use strict;
use Common;

#usually CGI::Application, plug-ins, HTML::Template, etc.

print "Content-type: text/html\n\n";
print "main.pm<br />";
1;

##</code><code>##

package Common;
use strict;

use Exporter 'import';
@EXPORT = qw( show_here );

sub show_here {
   print "common.pm<br />";
   return "thanks for contacting us";
}
1;

##</code><code>##

package Main::Contact;
use base qw( Main );

use Common; #why?
use strict; 

print "contact.pm<br />";

my $msg = show_here();
print $msg."<br />";

return 1;

##</code><code>##

main.pm
contact.pm
common.pm
thanks for contacting us
done