# Convert the decimal to hexadecimal and pad the result with a lea
+ding
    # zero if needed.
    my $hex = sprintf("%x", $dec);
    $hex = length( $hex ) == 1 ? "0".$hex : $hex;