sub a { print "letter a"; } sub b { print "letter b"; } sub mother_mary { print "whispers softly"; } 1; #### require Foo; mother_mary(); print " "; b(); print "\n"; #### $ perl require.pl whispers softly Letter B #### package Foo; sub a{ print "Letter A"; } sub b{ print "Letter B"; } sub mother_mary { print "whispers softly"; } 1; #### $ perl require.pl Undefined subroutine &main::mother_mary called at require.pl line 3.