foo.pl ------ #! /usr/bin/perl sub func1() { } sub func2() { } 1;