my @lines = grep { /START/ .. /END/ } <$fh>;