(0) &&
(1)) {print "Vi är lång"; } Ett praktiskt exempel för ovanstående kod är: använd strikt; print "Content-Type: text /html \\ n \\ n"; min $ du = "högt"; min $ mig = "högt"; if (($ du eq "kort") && ($ mig eq "tall")) {print "Vi är lång"; } "Tall" tilldelas variabeln $ du, och även till variabeln $ mig.
Det första uttrycket i tillstånd resulterar i falska och den andra resulterar i sann. (falskt) && (true) ger falskt som den effektiva booleskt värde för tillståndet. Så blocket inte exekveras. If-blocket kommer att genomföras i följande kod: använd strikt; print "Content-Type: text /html \\ n \\ n"; min $ du = "högt"; min $ mig = "högt"; if (
(0) ||
(1)) {print "Någon av oss är lång"; } Ett praktiskt exempel för ovanstående kod är: använd strikt; print "Content-Type: text /html \\ n \\ n"; min $ du = "högt"; min $ mig = "högt"; if (($ du == "kort") || ($ mig == "tall")) {print "Någon av oss är lång"; } Läs ovanstående kod.
Försök. Det första uttrycket resulterar i falsk; den andra en resulterar i sann. Den effektiva villkor är sant, eftersom (falskt) || (true) ger sant. INTE Exempel if-blocket kommer att utföras i följande kod: använd strikt; print "Content-Type: text /html \\ n \\ n"; (!
(0)) om {print "Jag är lång"; } If-blocket exekveras om villkoret är sant. ! (falskt) ger sant.
Ett praktiskt exempel på ovanstående kod är: använd strikt; print "Content-Type: text /html \\ n \\ n"; min $ mig = "högt"; if (! ($ mig eq "kort")) {print "Jag är lång"; } Elsif och annat Du kan fortfarande lägga till elsif och annars under uttalanden ovan kodexempel, efter vad vi lärt oss i en av de tidigare delarna i serien. Låt oss stanna här och fortsätta i nästa del i serien.
Chrys att komma fram till någon av delarna i denna serie, skriv bara motsvarande titel nedan i sökrutan på den här sidan och klicka på Sök (använd menyn om sådan finns): Komma igång med ActivePerl ActivePerl Basic Syntax Grunderna i ActivePerl variabler ActivePerl villkorssatser Boolean Logik för ActivePerl Boolean logik och ActivePerl villkor ActivePerl Jämförelse och Aritmetiska operatorer ActivePerl Loop Uttalanden ActivePerl Arrays ActivePerl Hashes ActivePerl Variabla typer och Context ActivePerl subrutiner ActivePerl foreach loop In