Schrift
[thread]8003[/thread]

verknuepftes Pattern matching: Pattern nach UND NICHT matchen



<< |< 1 2 >| >> 17 Einträge, 2 Seiten
nikster77
 2006-05-21 19:28
#66387 #66387
User since
2006-02-08
26 Artikel
BenutzerIn
[default_avatar]
Einen hab ich noch...

Gibt es eine Moeglichkeit des "matchens" nach:
m/ausdruck1 UND ausdruck2 NICHT ausdruck3/

so wie bei grep:
grep -v ausdruck3 text.txt | grep -E 'ausdruck1 |ausdruck2'

Danke
GwenDragon
 2006-05-21 19:57
#66388 #66388
User since
2005-01-17
14745 Artikel
Admin1
[Homepage]
user image
$string =~ m/ausdruck1/ && $string =~ m/ausdruck2/ && $string !~ m/ausdruck3/
renee
 2006-05-21 20:02
#66389 #66389
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Code: (dl )
$string =~ m/ausdruck1|ausdruck2/ && $string !~ m/ausdruck3/
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/
GwenDragon
 2006-05-21 20:09
#66390 #66390
User since
2005-01-17
14745 Artikel
Admin1
[Homepage]
user image
@renee
Klar auch richtig, ich dachte mein Beispiel wäre nachvollziehbarer für Anfänger ;)
renee
 2006-05-21 20:20
#66391 #66391
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
@GwenDragon: Sorry, als ich den Thread geöffnet habe, stand Deine Antwort noch nicht da... (Ich öffne immer mehrere Threads gleichzeitig und brauche dann etwas Zeit bis ich die "hinteren" Threads lesen und beantworten kann) :p :cool:
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/
GwenDragon
 2006-05-21 20:22
#66392 #66392
User since
2005-01-17
14745 Artikel
Admin1
[Homepage]
user image
@renee
Ist doch ok.
Das passiert mir auc. Ich sehe den Thread, tippe etwas, sende es ab und dann waren andere schneller. :)
renee
 2006-05-21 20:26
#66393 #66393
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
wobei unsere Sachen etwas unterschiedliches machen. Du hast Dich mehr an den Pseudocode gehalten und ich habe mich an dem grep-Aufruf orientiert (Stichwort "AND bzw. OR"-Verknüpfung)
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/
GwenDragon
 2006-05-21 20:28
#66394 #66394
User since
2005-01-17
14745 Artikel
Admin1
[Homepage]
user image
Ja, ich habe nicht so sehr nach dem grep geschielt und mich an den Pseudocode gehalten. Dann passt es nicht.
nikster77
 2006-05-21 20:33
#66395 #66395
User since
2006-02-08
26 Artikel
BenutzerIn
[default_avatar]
Danke euch.
Aber irgendwie tut's bei (mal wieder) nicht...
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
sub check_text {
open my $fh, "<", "/home/nikster/supertext" or die "Unable to read from supertext : $!";
while (1) {
for(my $i = 0; $i <= $#lines; $i++) {
if $_ (m/$lines[$i]->[0]|$lines[$i]->[5]|$lines[$i]->[8]/ && $_ !~ m/"(F)"/) {
print "alles scheint OK zu sein!\n";
}
}
}
}
close $fh;
pq
 2006-05-21 20:40
#66396 #66396
User since
2003-08-04
12208 Artikel
Admin1
[Homepage]
user image
definiere "tut's nicht".
Wiki:Mein Skript funktioniert nicht
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:Wie frage ich & perlintro Wiki:brian's Leitfaden für jedes Perl-Problem
<< |< 1 2 >| >> 17 Einträge, 2 Seiten



View all threads created 2006-05-21 19:28.