my $i = $i; local $i = $i;