请问十六进制转十进制，有没有办法替代strtonum

conall

十六进制转十进制:
echo '12af' | awk '{print strtonum("0x"$0)}'
4783
但在我的服务器shell环境，执行结果为0x12af
请问各位，有没有办法替代strtonum？

reyleon

$ echo $((16#12af))
4783

conall

回复 2# reyleon


    whyunwei@hbwossadmin02> echo $((16#12af))
Illegal variable name.

reyleon

回复 3# conall


    目测你不是使用的bash shell 了. 用bc命令试试吧

$ echo "obase=10;ibase=16;12AF" | bc
4783

PS:
1. bc 命令可能需要安装
2. 数字如果是16禁止, 字母要大写

conall

回复 4# reyleon


    谢谢！两个都可以，确实与运行环境有关。
whyunwei@hbwossadmin02> echo "obase=10;ibase=16;12AF" | bc
4783
whyunwei@hbwossadmin02> bash
whyunwei@hbwossadmin02:~/ydwg/config$ echo $((16#12af))
4783

想请问，下面这种方式，该怎么改？
awk -F";" '{OFS=";";print strtonum("0x"$1)+strtonum("0x"$2)+strtonum("0x"$3)+strtonum("0x"$4)+strtonum("0x"$5)+strtonum("0x"$6)+strtonum("0x"$7)+strtonum("0x"$}'

sunzhiguolu

1. echo '12af'|perl -ne 'printf("%d\n",hex($_))'

复制代码

4783

jason680

回复 5# conall

结果为何？

$ echo '1 c' | awk '{print strtonum("0x"$1)+strtonum("0x"$2)}'
13

   

conall

回复 7# jason680


    whoss@hubei3> echo '1 c' | awk '{print strtonum("0x"$1)+strtonum("0x"$2)}'
00xc

jason680

回复 8# conall

try this way

$ echo '1 c 3' | awk 'BEGIN{t=split("0123456789abcdef",a,"");for(n=1;n<=t;++n)H[a[n]]=n-1}function hex(x, n,t,s){t=length(x);for(n=1;n<=t;++n)s=s*16+H[substr(x,n,1)];return(s)}function strtonumx(x){if(sub(/^0x/,"",x))return(hex(x));return(x)}{print strtonumx("0x"$1)+strtonumx("0x"$2)+strtonumx($3)}'
16

conall

回复 9# jason680


    whoss@hubei3> cat 2.txt
020;020;020;020;020;020;020;020
020;020;020;020;020;020;020;020
020;020;020;020;020;020;020;020
020;020;020;020;020;020;020;020
020;020;020;020;020;020;020;020
020;020;020;020;020;020;020;020
020;020;020;020;020;020;020;020
100;000;000;;;;;
whoss@hubei3> nawk 'BEGIN{t=split("0123456789abcdef",a,"");for(n=1;n<=t;++n)H[a[n]]=n-1}function hex(x, n,t,s){t=length(x);for(n=1;n<=t;++n)s=s*16+H[substr(x,n,1)];return(s)}function strtonumx(x){if(sub(/^0x/,"",x))return(hex(x));return(x)}{print strtonumx("0x"$1)+strtonumx("0x"$2)+strtonumx($3)}' 2.txt
0
0
0
0
0
0
0
0