my @tmp;
push(@tmp,$_->[$fields{column1}]) for(@data);
my $var2 = min @tmp;