※ 引述《nash7555 (Caspar)》之铭言：
: 各位高手, 先进
: perl regexp小弟搞半天还是不太能掌握
: 如下行内容 - ($line)
: (582): truncated value with size 8 to match size of target (7)
: 想变成 - ($line_temp)
: : truncated value with size 8 to match size of target (7)
: 该如何撰写code
: 基本上想删除的内容是括号内任意0~9数字, 位元数不一定
: 想留下的内容是括号后面的(可能包含大小字母, 数字和特别符号)
: 万分感谢~
目前只研究到这里
print $string_temp."\n" if ($string_temp =~ /^\([0-9]+\):\s+.*$/);
显示如下:
(7006): actual bit length 16 differs from formal bit length 13 for port
"cfgbp_link2csr"
(120): truncated value with size 64 to match size of target (32)
(144): truncated value with size 64 to match size of target (32)
(241): truncated value with size 5 to match size of target (4)
但是砍掉就还不知道怎么做...
期望是:
: actual bit length 16 differs from formal bit length 13 for port
"cfgbp_link2csr"
: truncated value with size 64 to match size of target (32)
: truncated value with size 64 to match size of target (32)
: truncated value with size 5 to match size of target (4)

($line_temp = $line) =~ s/^\(\d+\)//; 应该就可以了