AW: Verknuepfungen in perl

"Pagel, Karsten" <[email protected]>
Newsgroups gmane.linux.suse.programming
Message-ID <!~!UENERkVCMDkAAQACAAAAAAAAAAAAAAAAABgAAAAAAAAAIsv7edqhoEyMsj9UW5hLM8KAAAAQAAAAT4+YSoWj3UWmWOU6TqawlQEAAAAA@pagel-pinneberg.de>
Hallo Heinz,

>> Die folgende Konstruktion funktioniert leider nicht so
wie erhofft:

>> if ($ebene eq startseite or fehlerseite) { print "" ;}
>> elsif ($ebene eq schule or gesundheit or verein) { print
"../" ;}
else { print "../../" ;}

>> Wenn ich dagegen schreibe

>> if ($ebene eq startseite) { print "" ;}
>> elsif ($ebene eq fehlerseite) { print "" ;}
>> elsif ($ebene eq schule) { print "../" ;}
>> elsif ($ebene eq gesundheit) { print "../" ;}
>> elsif ($ebene eq verein) { print "../" ;}
>> else { print "../../" ;}

>> funktioniert es.

Versuch doch mal folgendes:

if ($ebene eq startseite or $ebene eq fehlerseite) { print
"" ;}
elsif ($ebene eq schule or $ebene eq gesundheit or $ebene eq
verein) {
print "../" ;} else { print "../../" ;}

Ist zwar ungetestet, aber grundsätzlich muss das eq
wiederholt werden
denke ich.

Gruß

Karsten



-- 
Um die Liste abzubestellen, schicken Sie eine Mail an:
    [email protected]
Um eine Liste aller verfügbaren Kommandos zu bekommen, schicken
Sie eine Mail an: [email protected]
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.