Select Code to Download

#!/usr/bin/perl -w

...
foo1();
foo2();
print "All done.\n";

# first include file
sub foo1
...
}

1;

# second include file
sub foo2
...
}

1;