Select Code to Download

my %my_tcldefs = %{$cliParms->{'tclDefs'}};

print Dumper \%cliParms;

$VAR1 = {
          'tcl_defs' => {
...
            my_var2 => 'b'
          }
        };