$ perl -E '
> my $line = 55743;
> my $line2 = sprintf q{%#x}, $line;
> say $line2;'
0xd9bf
$