+ -
当前位置:首页 → 问答吧 → 如何按行输出?

如何按行输出?

时间:2010-10-21

来源:互联网

这里有一个文本文件"test.txt"
  1. GGCTAATGTAATCTTGTCTGTCTCT 1250 1 chr1:143699303 F
  2. GTCTCCGGCAGGAGAGCGATTCTCC 1250 1 chr5:128480757 F
  3. GAGATGACTCTTGAGGAACTGGGAG 1250 1 chr6:6230027 R
  4. GATATATAAAACAGGAAGAGAATTA 1250 1 chr4:64763747 F
  5. GCTATATATAATAGAAATAACGAAA 1250 1 chr10:46484879 R
  6. GATTGAATCTACATATCAAGTTAAG 1250 1 chr14:25462490 F
  7. GAGTTAGGAGGCAGCTTCTAGAATA 1250 1 chr6:31768150 R
  8. GTTCCACATTCTTCTCTGGCTTTAT 1250 1 chr11:18369843 F
  9. GAGATGTGTGTCACCATACCTGGGT 1250 1 chr1:95745125 R
  10. GAGGAGGTGGCCTTTGGCCTGGCCT 1250 1 chr3:46961497 R
  11. GGTTAAGTGAACTATCAGTGGTGTT 1250 1 chr17:50449109 F
  12. GCATCTGCAAAGACCCTATTTCCAG 1250 1 chr4:85003835 F
  13. GATCCCTGCCTCTTCTGTACTTTTT 1250 1 chr10:5065793 R
  14. GGTTGCCTCAATGAAAGAAGAAAAC 1250 1 chr17:51955417 F
  15. GTGTTACATATCCTTTTCAAGAAAG 1250 1 chr20:32145065 F
  16. GTAATGTACTTAAGAAATGTAATTA 1250 1 chr3:52948073 R
  17. GACTTTGACTTATTTCAGATTATTC 1250 1 chr17:47644123 F
  18. GGTATCATTGAATGGAATCGAATTG 1250 1 chr10:38922276 F
  19. GATGCCATTGTGCTTCTGTTATGTT 1250 1 chr15:87506426 R
  20. GCTTTAATTTTTTATTTCTCAAAAT 1250 1 chr6:27514725 F
  21. GTTTGCTAGACATTTTTTTTCATTC 1250 1 chr4:80515990 F
复制代码
我想把里面包含chr6的行输出来,应该怎么办呀?

作者: jackbrown   发布时间: 2010-10-21

perl -ne "print if /\schr6/" test.txt

作者: zhlong8   发布时间: 2010-10-21

回复 jackbrown


    grep " chr6:" test.txt

作者: 珞水的大叔   发布时间: 2010-10-21

while (<DATA>) {
   if (/chr6/) {
     print "$_\n";
   }
}

作者: leigh111   发布时间: 2010-10-21