my $cond = 1;
foreach $_ ($cond) {
    my $i = 1;
}
foreach $_ ($cond) {
    my $j = 1;
}