Select Code to Download

Select or download this

my %hash = (
             '103496-1'  => [{ 'CLVD' => '5678', 'COMP' => '1234', 'FD
+' => '0010', 'Files' => [{'File' => 'text.txt', 'hash' => 'a538346ad3
+485'},{'File' => 'text2.txt', 'hash' => '237d97892376a'}] }]
...
print Dumper(%newhash);
print "\n";

Select or download this

Pseudo-hashes are deprecated at hashofhash.pl line 18.
Use of uninitialized value in hash element at hashofhash.pl line 18.
...
          }
        ];