perl 提取()括号中的数字

2025-05-02 03:57:19
推荐回答(2个)
回答1:

if(/OTU\d+\((\d+)\)/){$ext=$1;}
变量$ext就是要提取的值。

回答2:

$_=~/(.*)\((.*)\)/;
print out "$2\n";