while( ($key, $value) = each %hash) {
        print "$key +> $value\n";
        $key = $value;
}