Hash Perl

#!/usr/bin/perl
use strict;
use warnings;
my %hash = ('Key1' => 'Value1', 'Key2' => 'Value2');
print "$_ => $hash{$_} \n" foreach keys %hash;
foreach (sort values %hash) {
    print "Value: $_ \n";
}