Select Code to Download

use warnings; use strict;
use vars qw(@array);
...
  @array[4..11] = 104..111;
  print "INSIDE: @array\n";
}

BEFORE: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
INSIDE: 1 2 3 4 104 105 106 107 108 109 110 111 13 14 15 16 17 18 19 2
+0
AFTER: 1 2 3 4 5 6 7 8 9 10 11 111 13 14 15 16 17 18 19 20