C:\>perl -e "my $code = 0x15; print hex $code"
21
C:\>perl -e "my $code = 0x02; print hex $code"
2
C:\>