push @arr, [ $l1[3], $l1[7], $lines[$i] ]; print "first item: $arr[0][0], second item: $arr[0][1], third item: $arr[0][2]\n";