printf("0x%02X",$SM); #### | hand waving here... my $n = 0x85; printf "and the majic number is: %s\n",as_hex($n); | more handwaving exit(0); sub as_hex{ my $x=shift; sprintf "%X",$x; }