sub hexout4 { "@{[unpack('H*',pop)=~/../g]}" } #### printf "%#x\n", 0; printf "%#x\n", 1; __END__ Prints: 0 0x1 #### int main () { printf("%#x\n", 0); printf("%#x\n", 1); return 0; }