/START/ .. /END/ and push @lines, $_ while <DATA>;