chomp @lines; foreach (@lines) { next unless /^>/; push @chromoLine, $_ if (split /\|/)[4] =~ /\Q$Homosapiens\E/; } [download]
Paul
In reply to Re: Double RegEx by rev_1318 in thread Double RegEx by MonkPaul