E:\>perl -MO=Deparse,-p -le"print for (1..10 or 1..11);"

foreach $_ (((1 .. 10) or (1 .. 11))) {
    print($_);
}

-e syntax OK
[download]

That's what's happening.