【求助】如何将文本中的16进制数字转换为10进制呢？

JackMa2009

$ awk -F '[(,]' '/insert into/&&$3~/^0x/{printf $1"(";printf $2",";system("prin
tf \"%d\" "$3"");print ","$4","$5","$6","$7","$8","$9","$10","$11";n
ext}1' ma5600t_insert_alarm_CH.sql

上面的脚本是用来将下面的脚本中16进制数字转换成10进制的

use FaultDB
go

delete tbl_AlarmReason where DevType = -65495
go

insert into tbl_AlarmCfg values(-65495,0x0121a001,1,5,10,1,0,'数据库初始化失败','主控板数据库初始化失败,会导致系统复位，系统再次启动后将从备区数据库读取数据进行恢复',3,'3,4#单板的描述(仅网管可见)')
go

其中,[(,] 表示以"(" 或 ","为分隔符.如果单引号中的","不做为分隔符.那么怎么实现呢?

[ 本帖最后由 JackMa2009 于 2009-5-4 11:16 编辑 ]

greendays

man od

[ 本帖最后由 greendays 于 2009-5-2 12:47 编辑 ]

ly5066113

$ num='0x22edf034'
$ echo $((16#${num#0x}))
586018868

JackMa2009

楼上的是什么意思啊。我要将类似下面的文本：

insert into tbl_AlarmCfg values(0x22edf034, "AAAAAAAAAAAA");

转换成

insert into tbl_AlarmCfg values(586018868, "AAAAAAAAAAAA");

请支招，谢谢！

lululau

cat file | perl -pe 's/0x[a-f0-9]+/hex($&)/eg;'

JackMa2009

Administrator@jacky ~
$ cat aaa.sh | perl -pe 's/0x[a-f0-9]+/hex($&)/eg;'
bash: perl: command not found

要装perl吗？我没有玩过perl.能不能纯shell 语言实现下啊。

非常感谢。先祝你5.1 Hanppy哦

twfcc

try,
#! /bin/bash
while IFS= read -r
    do
       c=$(echo $REPLY | sed 's/.*(//;s/, *.*//')
       ch="values("$(echo -e $((16#${c#0x})))","
       echo $REPLY | awk -v v=$ch '{if(sub(/..*/, v, $4))print $0}'
    done < "$*"

JackMa2009

我把你的内容放到文本中执行，报错啦：（

Administrator@jacky ~
$ . ./test.sh
: No such file or directory

Administrator@jacky ~
$ cat test.sh
#!/bin/sh
while IFS= read -r
    do
       c=$(echo $REPLY | sed 's/.*(//;s/, *.*//')
       ch="values("$(echo -e $((16#${c#0x})))","
       echo $REPLY | awk -v v=$ch '{if(sub(/..*/, v, $4))print $0}'
done < "$*"

Administrator@jacky ~
$ ls -l test.sh
-rwxrwxrwx 1 Administrator None 224 May  2 13:15 test.sh

twfcc

.nc10@your-5554c55be4 ~
$ cat junk
insert into tbl_AlarmCfg values(0x22edf034, "AAAAAAAAAAAA");
insert into tbl_AlarmCfg values(0x22edf034, "AAAAAAAAAAAA");
insert into tbl_AlarmCfg values(0x22edf034, "AAAAAAAAAAAA");

nc10@your-5554c55be4 ~
$ cat ee
#! /bin/bash
while IFS= read -r
    do
       c=$(echo $REPLY | sed 's/.*(//;s/, *.*//')
       ch="values("$(echo -e $((16#${c#0x})))","
       echo $REPLY | awk -v v=$ch '{if(sub(/..*/, v, $4))print $0}'
    done < "$*"

nc10@your-5554c55be4 ~
$ chmod +x ee                                                                                                                                                   nc10@your-5554c55be4 ~
$ ./ee junk
insert into tbl_AlarmCfg values(586018868, "AAAAAAAAAAAA");
insert into tbl_AlarmCfg values(586018868, "AAAAAAAAAAAA");
insert into tbl_AlarmCfg values(586018868, "AAAAAAAAAAAA");

nc10@your-5554c55be4 ~
$

twfcc

用樓上 perl re, 改改好些

#! /bin/bash
while IFS= read -r
    do
       c=$(echo $REPLY | sed 's/.*(//;s/, *.*//')
       ch=$(echo -e $((16#${c#0x})))
       echo $REPLY | awk -v v=$ch '{if(sub(/0x[a-f0-9]+/, v, $4))print $0}'
    done < "$*"

當文本格式一樣