use strict;
use warnings;

print "hello world\n";

foo();

##</code><code>##

$perl func.pl
hello world
Undefined subroutine &main::foo called at func.pl line 6.