40 #printf "%X", convert("E1");
42 #printf "%X", convert("71");
57 $addr = substr($_,0,4);
58 $inst = substr($_,27,3);
59 $val = substr($_,31,2);
62 $daddr = (hex $addr) + 2 + convert($val);
65 if (defined $commands{$inst}) {
68 #print " $addr $inst $val\n";