print for my @x = 1 .. 10;
for ( my @y = 1 .. 10 ) {
    print
}
print "@x\n@y\n";
[download]