my $text = do { local $/; <FILE> };
$text =~ s/^Header1.*?END LIST\n?//msg