[英]unable to convert string to hex in PERL
我正在解析一个由十进制以及用“:”分隔的十六进制值组成的文件:
foreach $line (<INFO>) {
my ($seq_no, $size_in_bytes, $Hitcount, $buffer) = split /:/, $line;
# $size in_bytes is a hexadecimal value.
print "check 1 $size_in_bytes\n"; # printing some value in hexadecimal
$size_in_bytes = hex($size_in_bytes);
print "check 2 $size_in_bytes\n"; # Printing ZERO??
}
我也尝试了以下方法,但仍然只给出零。
$dec_num = sprintf("%d", hex($num));
你能告诉我如何将字符串转换为十进制吗
由于问题出在字段中多余的空间上,因此您应该像这样拆分
split /\s*:\s*/, $line
这样,如果有空格,空格将被删除,但是如果没有空格, split
仍然可以正常工作。
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.