if (Bedingung){Perlcode, wenn Bedingung true} else{Perlcode, wenn Bedingung false}
Erweiterte Bedingungsabfrage ( select-case ) if (Bedingung 1) {Perlcode, wenn Bedingung 1 true} elsif (Bedingung 2) {Perlcode, wenn Bedingung 1 false, 2 true} elsif (Bedingung 3) {Perlcode, wenn Bedingung 1 und 2 false, 3 true} elsif (Bedingung 4) {Perlcode, wenn Bedingung 1 und 2 und 3 false, 4 true} else {Perlcode, wenn keine Bedingung true}
Kurzformen
Besteht der auszuführende Perlcode im true-Zweig aus genau einer Anweisung,
dann kann verkürzt geschrieben werden Anweisungif(Bedingung)
Beispiel : print $ergebnis if ( $str1 eq $str2 );
Besteht der auszuführende Perlcode im trueund im false-Zweig aus genau einer Anweisung,
dann kann verkürzt geschrieben werden (Bedingung) ?Ausdruck(true):Ausdruck(false);
Beispiel : ( $pass eq "geheim" ) ? print "OK" : exit 0;
Bedingungsabfrage mit unless
unless negiert die if-Logik. unless (Bedingung) { ... } ist identisch mit if !(Bedingung) { ... }
Das gilt auch für die Kurzform.
Hinweise
Die if - Abfrage leitet einen eigenen Codeblock ein, der seperat vom übrigen Code
betrachtet werden kann. Optisch macht man das kenntlich, indem man den Codeblock im Quellcode einrückt:
AnweisungAnweisungif ( ... ){Anweisung im true-ZweigAnweisung im true-Zweig}
else {Anweisung im false-ZweigAnweisung im false-Zweig}Anweisungen ...