a subroutine doesn't get executed unless you call it; this:

print "a";
sub doit { print "zed" }
print "b";
&doit();
[download]

prints "a", then "b", then "zed". After the print "a", perl jumps right over the sub definition to the next plain statement.