my @data;
my $col=0;
my %fields;
foreach(@{$sth->{NAME_lc}}){
    $fields{$_}=$col++;
}
while(my $ref=$sth->fetchrow_arrayref){
    push @data,[@ref];
}

my $var1=$data[0]->[$fields{column1}]; #->klappt, gibt Wert zurück 
my $var2=min @data->[$fields{column1}]; #->gibt Referenz zurück