Hier klappt es...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
$ perl -Mstrict -w
my @arr = (
'bla',
'<SW-SYSCOND>((<SW-SYSTEMCONST-CODED-REF>S1B1_SY</SW-SYSTEMCONST-CODED-REF> == 2) || (<SW-SYSTEMCONST-CODED-REF>S1B2_SY</SW-SYSTEMCONST-CODED-REF> == 2) || (<SW-SYSTEMCONST-CODED-REF>S2B1_SY</SW-SYSTEMCONST-CODED-REF> == 2) || (<SW-SYSTEMCONST-CODED-REF>S3B1_SY</SW-SYSTEMCONST-CODED-REF> == 2) ||<SW-SYSTEMCONST-CODED-REF>K1_SC</SW-SYSTEMCONST-CODED-REF>)</SW-SYSCOND>',
);
for ( @arr ) {
if ( m/(<SW-SYSCOND>.*<\/SW-SYSCOND>)/gi ) {
print "yes\n";
}
else {
print "no\n";
}
}
^D
no
yes
Fehlen evtl. Zeilenumbrüche in Deiner Ausgabe, sodass Du Ausgaben übersehen hast?
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!