# NOTE: Derived from Foo.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package Foo; #line 18 "Foo.pm (autosplit into auto/Foo/fred.al)" sub fred { print "fred!\n" }; # end of Foo::fred 1;