Select Code to Download

use strict;
use warnings;
...
foreach my $a (sort keys %cmdData) {
    print $a. ", " . $cmdData{$a}{opcode} . ", " . $cmdData{$a}{cmd} .
+ "\n";
}

6, 0x0, 0x1
4, 0x0, 0x1
...
0x0, 0x1, 5
a, 1, 2
b, 1, 2