my @tmp=();
push @tmp, $_->[0] for @$res;