Select Code to Download

#!/usr/bin/perl -w
use Data::Dumper;
...
/root/dir1/file3
/root/dir2/file1

$VAR1 = {
 'root' => {
...
    }
  }
};