while (<$fh>) {
     push(@lines, $_) if /START/ .. /ENDE/;
}