#!/usr/local/bin/perl -w

my @list = ();

open(LIST, "< listfile.txt");
while (<LIST>)
{
	chomp;
	my @temp = split(/\t/, $_);
	$list[$count++] = \@temp;
}
close(LIST);

# Should be the second column of the second row.
print $list[1][1], "\n";