$ perl -e'my $sub = \&stat; $sub->("a")'
Undefined subroutine &main::stat called at -e line 1.