path: root/Bugs/myforeach

sub foo { my $i; for $i (@bar) { } }