Select Code to Download

#!/usr/bin/perl                                                       
+                                               
use strict;
...
}

print Dumper($ret_struct);

$VAR1 = {
          'cmd2' => [
...
                                 ]
                     }
        };