my $i = undef;
for(1..3){
  $i = $_;
}


for(1..3){
  my $j = $_;
}