Thread regulärer Ausdruck funktioniert nicht (6 answers)
Opened by Gast at 2006-09-05 18:02

renee
 2006-09-06 10:12
#69523 #69523
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Warum eigentlich mehrere Reguläre Ausdrücke und das if?

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#!/usr/local/bin/perl

use strict;
use warnings;

open (FILE_MAKE_ERR,'<', "make.err") or die $!;

while(my $line = <FILE_MAKE_ERR>)
if(my ($test) = $line =~ /(?i:error)\s+in\s+([^\s]+)/){
print $test,"\n";
}
}

close FILE_MAKE_ERR;


Inhalt der Datei:
Code: (dl )
1
2
3
ERROR in freeware/lib/lib_nt.mak (lib). See /net/test.i18Global/file.err
error in test/path/test.mak (lib)
test error


Ausgabe:
Code: (dl )
1
2
3
123> perl regex.pl 
freeware/lib/lib_nt.mak
test/path/test.mak
\n\n

<!--EDIT|renee|1157523470-->
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/

View full thread regulärer Ausdruck funktioniert nicht