我如何使用perl来计算变量

时间:2016-05-13 07:17:53

标签: perl

PASS AC=0;AF=0.048;
AN=2;
ASP;
BaseQRankSum=0.572;
CAF=[0.9605,.,0.03949];
CLNACC=RCV000111759.1,RCV000034730

我是新来的。我想知道如何使用正则表达式匹配CAF = [0.9605,。,0.03949],谢谢。

2 个答案:

答案 0 :(得分:0)

while (<>) {
    if (
        /^CAF=   # start of line, then literal 'CAF='
         \[      # literal '['
         [^\]]+  # 1+ characters different from ']'
         \];     # closing ']'
         /x
      )
    {
        print;
    }
}

/x修饰符允许在正则表达式中使用换行符和注释(以提高可读性)。

或者,作为一个班轮:

perl -ne 'print if (/^CAF=\[[^\]]+\];/);' <your_file>

这将打印包含所需图案的完整行。

答案 1 :(得分:-1)

您需要阅读Perl正则表达式的文档。您所询问的内容看起来并不比初学者阅读文档时更复杂:

http://perldoc.perl.org/perlre.html