Help for this page

Select Code to Download


  1. or download this
    !/bin/perl -w
use strict;
...
Readonly my $_debug_ops => ($DBG_RAND | $DBG_KEYS | $DBG_INFO);

printf "debugops = 0x%04x\n",$_debug_ops;
  2. or download this
    Argument "=28" isn't numeric in printf at ./dbgtst line 16.
debugops = 0x0000