my $f; for $f (1..3) { } for my $f (1..3) { }