|
Simple Sand Samples |
Perl > 文字列を数値に変換する(文字コードを得る)
str2hex.pl
while(<>){
foreach(split //,$_){
printf"%02x\n",unpack("C",$_)
}
}
$ echo -n HELLO | perl str2hex.pl
48
45
4c
4c
4f
$
48
45
4c
4c
4f
$
* 確認環境 Debian Linux(Wheezy)
|
Simple Sand Samples |
while(<>){
foreach(split //,$_){
printf"%02x\n",unpack("C",$_)
}
}