Re^2: foreach-loop-local var in sub

[choroba]

you have changed context and $i is uninitialized within that context and therefor you are going to print zeros

Not exactly true. Try with

foreach (qw(a b)) {

Update: Do not use numbers for testing behaviour, see Re^3: variable declaration question.