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