@line1 = $array[0]; print "@line1\n"; # this works @line1 = split(/\t/); $var1 = $line1[0]; print "$var1\n"; # this doesnt work