Pack to hex string and unpack : unpack « System Functions « Perl. ... $bytes); print "$str2\n"; $bytes = unpack("h*",$str); # hex string print "$bytes\n"; ...
確定! 回上一頁