my $flag;
foreach (@lines) {
   $flag++ if /start-phrase/;
   next unless $flag;

   # process
}