foreach $cmd (keys %fssaCmd) {
	$opcode = sprintf("%x",$fssaCmd{$cmd}{fixed_pattern});
	$apid = sprintf("%x",$ApidBase+$ApidOffset);
	print ("$cmd, 0x$apid, 0x$opcode\n");
	%cmdData = (%cmdData, 
		"0x$apid" => {
			opcode => "0x$opcode",
			cmd => $cmd
		}
	)
}

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