我如何使用Perl來計算變量的頻率

Question

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]，謝謝。

Answer 1

您需要閱讀Perl正則表達式的文檔。你所要求看起來並不複雜得多，初學者能匹配已經閱讀文檔：

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

Answer 2

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> 

這將打印含有所需圖案的完整行。