Hi, If you want to have all the values in one array you
can use something like this:

use strict;
use warnings;

my $path_to_infile= "<set path here>";
my @workarray;

open (IN, "< $path_to_infile") or die $!;

while (<IN>) {
    chomp;
    push (@workarray, split("\t", $_));
}

print "Value is : $workarray[0]\n";
print "Value is : $workarray[1]\n";
print "Value is : $workarray[2]\n";
print "Value is : $workarray[3]\n";
print "Value is : $workarray[4]\n";
print "Value is : $workarray[5]\n";
[download]

This works only if you still have the tabs and newlines
in your in-file
si_lence