my $n; for (1..100000000) { $n=0 }

real    0m9.395s
user    0m9.397s
sys     0m0.000s
_________________________________


for (1..100000000) { my $n=0 }

real    0m12.773s
user    0m12.765s
sys     0m0.004s
_________________________________


for (1..100000000) { state $n=0 }

real    0m7.282s
user    0m7.244s
sys     0m0.008s