push(@arr1,$l1[3]); push(@arr2,$l1[7]); push(@arr3,$lines[$i]); print "first item: $arr1[0], second item: $arr2[0], third item: $arr3[0]\n";