my %weekly_temperature = ( monday => 65, tuesday => 68, wednesday => 71, thursday => 53, friday => 60,
);
print "\nACCESSING KEYS:\n";
foreach my $key (keys %weekly_temperature){ print "key: " . $key . "\n";
}
print "\nACCESSING VALUES:\n";
foreach my $value (values %weekly_temperature){ print "value: " . $value . "\n";
}
print "\nACCESSING VALUES USING KEYS:\n";
foreach my $key (keys %weekly_temperature){ print "[$key: " . $weekly_temperature{$key} . "]\n";
}