my @new = map{$_->[0]}@$listref;