sub foo { my $static = 42 if 0; print "static is now $static\n"; $static++; } foo() for 1..5;