my %hash = ( a=>1, b=>2, c=>3);
my @v = values %hash;  #  e.g. ( 2,   3,   1 )
my @k = keys   %hash;  #  e.g. ('b', 'c', 'a')
[download]

You could also use the each function, which returns the next key and value pair of the hash, eg.

my %hash = (
    'apple'  => 'red',
    'banana' => 'yellow',
);
while( my( $key, $value ) = each %hash ){
    print "$key: $value\n";
}
[download]

See each for more info.

my %hash = (
    '1'  => 'One',
    '2' => 'Two',
    '3' => 'Three',                                                   
+                                          
);
print "Key: $_ and Value: $hash{$_}\n" foreach (keys%hash);
[download]

Some examples using the "babycart" (@{ [ ... ] }) operator to interpolate a bit of code into a double-quoted string.

knoppix@Microknoppix:~$ perl -E '
> %hash = ( a => 1, b => 2, c => 3 );
> say qq{@{ [ values %hash ] }};
> say qq{@{ [ sort { $b <=> $a } values %hash ] }};
> say qq{@{ [ map $hash{ $_ }, sort keys %hash ] }};'
3 1 2
3 2 1
1 2 3
knoppix@Microknoppix:~$
[download]

I hope this is helpful.