for my $key ( sort {$hash{$a} <=> $hash{$b} } keys %hash )
{
     print " MIRACLE_HAPPENS is equal to key : \'$key\' and value : \'$hash{$key}\'.\n";
}