问下if多条件语句怎么写

raoweijian

1. if(($c[-1] eq "A" && $c[-2] eq "W"||"M"||"R")
   
2. || ($c[-1] eq "T" && $c[-2] eq "W"||"K"||"Y")
   
3. || ($c[-1] eq "C" && $c[-2] eq "S"||"M"||"Y")
   
4. || ($c[-1] eq "G" && $c[-2] eq "S"||"K"||"R")){

复制代码

比如这里，条件是想表达  $c[-1]等于A，$c[-2]等于WMR中的任意一个
或者                           $c[-1]等于T，$c[-2]等于WKY中的任意一个
或者                           $c[-1]等于C，$c[-2]等于SMY中的任意一个
或者                           $c[-1]等于G，$c[-2]等于SKR中的任意一个
就符合条件，但是好像这里写的有错误，很多不符合条件的也匹配上了。应该怎么改？

climby

回复 1# raoweijian


  " $c[-2]等于WMR中的任意一个" 的写法 可以用正则表达式， 如下：

    $c[-2] =~ /^[WMR]$/ ;

raoweijian

回复 2# climby


谢谢，茅塞顿开，改了一下，结果好多了，不知道还有没有别的问题？
比如每个用 || 分割的条件需不需要用（）括起来？

laputa73

建议有||和&&的全部强制()
否则几乎是必错

ps
看你这个象是用c的字符串处理方式
perl用整串正则就可以了
类似这样的
$c=~/ [WMR]A$|[WKV]T$|[SMY]C$|[SKR]G$/

ps2
ATCG LZ学生物的?

picbhan

回复 4# laputa73


    伤不起的ATGC，伤不起的生物程序猿啊，呵呵。楼上的知道ATGC，莫非是学生物的？

laputa73

还是高中学的印象,ATCG碱基对

raoweijian

回复 4# laputa73


    嗯嗯，现在做生物信息分析的..

afukada

有時候看到有bioinformatic的問題

都很想問"你到底想要做什麼"

如果不是需要保密的研究(比方說是你們新創的algorithm)

我的建議是直接說明需求會比較好

我大概可以猜到你是要找nucleotide和peptide之間的東西

raoweijian

回复 8# afukada

当然不是为了保密，只是把需要问的主要问题精简出来..
像1L里贴的一样，KMWYR之类的，我想多数人不是很有兴趣吧。。


   

afukada

精簡問題沒問題

有時候把需求說出來會比較方便

做bioinformatic有些module可以完成你想做的事

或是有一些前人提供好的想法