Select Code to Download

# PERL 6!!!!
@array1 = ( 1..5 );
...
  # @a is [ 1,2,3,4,5]
  # @b is [ 6,7,8,9,10 ]  
}

# PERL 5
@array1 = ( 1..5 );
...
   # @a is [1..10]
   # @b is empty.
}