while () { ... # $_ is the current line } #### if ((split "\t",$_)[7] =~ /^(?:HIGH|LOW|LRR)$/)