Select Code to Download

convertToFile($dir,$name,@data);

$newHash{$file} = $time;

$newHash{$dir}{$file} = $time;

convertToFile($dir,$name,sort(keys(%data)));

    %full = (%files1,%files2);

$files1 = {
          'ABC' => {
...
                  'file3' => 8 
                }
        };