Calculer la fréquence de chaque valeur dans le Hash

Author:
#!/usr/bin/perl -w
my %mes_villes = ("Allemagne" => "Berlin",
    			  "France" => 'Paris',