18:37 >perl -Mstrict -wE "use subs 'TestMe'; BEGIN { TestMe(); } sub TestMe { say 'Hi!'; }"
Undefined subroutine &main::TestMe called at -e line 1.
BEGIN failed--compilation aborted at -e line 1.

18:37 >