Datei einlesen von "START" bis "ENDE" - #71500 (Allgemeines zu Perl)

Duff

2006-11-08 12:15

User since
2006-10-06
283 Artikel
BenutzerIn

user image

Code: (dl )

my @lines;
open my $fh,'<',$file or die $!;
while(<$fh>){
   if(/START/ .. /ENDE/){
       push(@lines,$_);
   }
}
close $fh;

print $_ for @lines;

Also ich finde diese Lösung von renee eigentlich noch am besten, da sie auch sehr übersichtlich ist (im Vergleich zu so einem Einzeiler).\n\n

D'OH
Daniel