my @ar = values %$h; # or postfix form: # my @ar = values $h->%*;