亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

Chinaunix

標(biāo)題: 求一個(gè)正則表達(dá)式，用來(lái)選擇要的文件 [打印本頁(yè)]

作者: 54red 時(shí)間: 2015-08-12 10:36
標(biāo)題: 求一個(gè)正則表達(dá)式，用來(lái)選擇要的文件
015_S21_vcf_HSP_else_mutation1.txt
015_S21_vcf_HSP_else_mutation2.txt
015_S21_vcf_HSP_mutation1.txt
015_S21_vcf_HSP_mutation2.txt
others.txt

我有這幾個(gè)個(gè)文件：（文件名不打算改了）
打算分開(kāi)操作，不過(guò)我的正則估計(jì)不大對(duì)，求大家?guī)蛶兔Γ?*(?!else)_mutation2.* 不能選擇不帶else的mutation2
現(xiàn)在我用的：
if($file=~m/.*else_mutation2\.txt*/)
{
print OUT "疾病不相關(guān)新突變\n";

}
if($file=~m/.*(?!else)_mutation2.*/)
{
print OUT "疾病相關(guān)新突變\n";

}
if($file=~m/.*else_mutation1.*/)
{
print OUT "疾病不相關(guān)致病突變\n";

}
if($file=~m/.*(?!else)_mutation1.*/)
{
print OUT "疾病相關(guān)致病突變\n";

}

作者: MMMIX 時(shí)間: 2015-08-12 10:43
回復(fù) 1# 54red

應(yīng)該用斷言, 例如:

$ perl -E '@a = qw(015_S21_vcf_HSP_else_mutation2.txt 015_S21_vcf_HSP_mutation2.txt); for (@a) { say if m/(?<!else_)mutation2/ }'
015_S21_vcf_HSP_mutation2.txt

復(fù)制代碼

作者: 54red 時(shí)間: 2015-08-12 10:52
十分感謝，有空我要好好學(xué)一學(xué)正則！回復(fù) 2# MMMIX

歡迎光臨 Chinaunix (http://www.72891.cn/)