Help for this page

Select Code to Download

Select or download this

my $Cmdref;
#----------
...
...
  $opcode = sprintf("0%x",$Cmdref->{$cmd}{fixed_pattern});

Select or download this

my %ThingyCmd= ...
push @main::allCmd,\%ThingyCmd;