$ perl -le " printf qq{0x%04s\n},$_ for unpack '((H4)3)(H)', qq/COM7: +/ " 0x434f 0x4d37 0x003a 0x0000 [download]
In reply to Re: String to hex by Anonymous Monk in thread String to hex by jasal