请教perl提取负数
时间：10-02
整理：3721RD
点击：
txt文档：
BE0_V0 = 0 //
BE0_V1 = 17 //
BE0_V2 = 34 //
BE0_V3 = -51 //
DLM0 = 0 //
DLM1 = 0 //
perl 提取变量的值：
$o_BE0_V2 = $1 if /^BE0_V2\s+=\s+(\d+)\s+/;
$o_BE0_V3 = $1 if /^BE0_V3\s+=\s+(\d+)\s+/;
请教对于o_BE0_V3是负数的如何提取
BE0_V0 = 0 //
BE0_V1 = 17 //
BE0_V2 = 34 //
BE0_V3 = -51 //
DLM0 = 0 //
DLM1 = 0 //
perl 提取变量的值：
$o_BE0_V2 = $1 if /^BE0_V2\s+=\s+(\d+)\s+/;
$o_BE0_V3 = $1 if /^BE0_V3\s+=\s+(\d+)\s+/;
请教对于o_BE0_V3是负数的如何提取
哦，试出来了$o_BE0_V2 = $1 if /^BE0_V2\s+=\s+(\S+)\s+/;
请教perl如何将负数，转化为十六进制?
哦，原来perl支持负数转十六进制啊，呵呵，乌龙了。就当是灌水赚积分了