my @a1 = 1 .. 10;
my @a2 = 1 ... 10;
print "@a1\na2\n";

##</code><code>##

while (<FILE>) {
  if (/BEGIN/ .. /END/) {
    # do stuff
  }
}