Select Code to Download

use warnings;
use strict;
...
2 3
1 2
2 2

>perl uniq_hash_value_1.pl
$VAR1 = {
...
                   '3'
                 ]
        };