Help for this page
my @a1 = 1 .. 10; my @a2 = 1 ... 10; print "@a1\na2\n";
while (<FILE>) { if (/BEGIN/ .. /END/) { # do stuff } }