eine foreach, mehrere regex operationen (Allgemeines zu Perl)

[thread]10393[/thread]

eine foreach, mehrere regex operationen

Leser: 1

Gast Gast

2007-09-14 10:30

Hallo Leute,

Ich hab hier eine foreach() Schleife und einen Regex.
Es sieht so aus:

Code (perl): (dl )

  foreach my $e (@result1) {
    $e =~ /(\d+.\d+.\d+.\d+","\d+","\w+.\w+.\w+)/m;
    push(@result2, $1); 
  }

Nun muss ich aus @result1 aber noch ALLES ENTFERNEN was den string "*learned*" enthaelt(die ganze Zeile). Und dann muss das wieder in @result2 rein. Kann ich das noch irgendwie in die foreach Schleife integrieren? Weil sonst braeuchte ich extra ein neues array.
Im Array ist pro Element eine Zeile aus einer Textdatei.

Hat da jemand eine Idee?

Gruß,

rPerl

renee

2007-09-14 10:49

User since
2003-08-04
14371 Artikel
ModeratorIn

Code (perl): (dl )

foreach my $i ( reverse 0..$#result1) {
    my $elem = $result1[$i];
    if( $elem =~ /(\d+.\d+.\d+.\d+","\d+","\w+.\w+.\w+)/m ){
        splice @result,$i,1 if $elem =~ /learned/;
        push(@result2, $1); 
    }
}

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

Gast Gast

2007-09-14 15:32

danke, hast mir mein ... gerettet :)

gruß,

rperl

View all threads created 2007-09-14 10:30.