!/usr/local/bin/perl -wc
use strict;
sub foo {
    return not_here("baz");
}
print &some_undef_method(1);
__END__
bester:~> tmp/monk.pl 
tmp/monk.pl syntax OK