print $fh "$ita => ",
                   join(',', map { $_ // () } @{ $hash{$ita} }),
                  "\n";