You didn't do much research, did you?

pack, print, sprintf %04x, 123;