Opened by Gast at 2006-08-31 16:53
Hallo, ich hab das Problem schon in anderen Perl-Foren gepostet, aber irgendwie scheinen dort die Leute genauso ratlos wie ich zu sein.
Nach meinem Verständnis dürfte niemals "2nd" gedruckt werden. Wird es aber. Ich habe Fälle, in denen der reguläre Ausdruck von der ersten if-Schleife als false bewertet wird, dann aber beim else-Teil korrekt als true bewertet wird.
Hat irgendjemand eine Idee, wie das kommt?
Code: (dl
)
1
2
3
4
5
6
7
if ($sl =~ m/\n\s*(Subject.*\n)/gm) {
$mid=$1; print "1st\n";
} else {
if ($sl =~ m/\n\s*(Subject.*\n)/gm) {
$mid=$1; print "2nd\n";
}
}Nach meinem Verständnis dürfte niemals "2nd" gedruckt werden. Wird es aber. Ich habe Fälle, in denen der reguläre Ausdruck von der ersten if-Schleife als false bewertet wird, dann aber beim else-Teil korrekt als true bewertet wird.
Hat irgendjemand eine Idee, wie das kommt?