#!/usr/bin/perl -w use strict; use lib '.'; use Inc1; use Inc2; print "Here we go!\n"; foo1(); foo2(); print "All done.\n"; #### # first include file sub foo1 { print( "This is a test from foo1.\n" ); } 1; #### # second include file sub foo2 { print( "This is a test from foo2.\n" ); } 1;