#!/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";
}
