print @array;                             # gives the same result as:
print qq{$hash{$_}} for sort keys %hash;  # this