Undefined subroutine &main::foo called at try.pl line 25.