or download this
my @arr1 = qw|10 22 24 21 20 12 32 31 91 20|;
my @arr2 = qw|10 22 24 21 20 12 32 31 91 20 11 32 44 51 10 22 82 71 61
+ 54|;
...
print q|ARR->1 | . join qq| |,@arr1;
print qq|\nARR->2 | . join qq| |,@arr2;
print qq|\nARR->3 | . join qq| |,@arr3;