דוגמא לביטוי if
print "how old are you?";
$a=<
STDIN>;
chop (
$a);
if (
$a <
18) {
print "you are not old enough to vote!\n";
}
else{
print "you are old enough- so go vote!\n";
$voter++;
# סופרים את האנשים שהצביעו
}
וניתן לדלג על בלוק ה
-
else
ולהשאר רק עם בלוק ה
-
:then
print "how old are you?";
$a=<
STDIN>;
chop (
$a);
if (
$a <
18) {
print "you are not old enough to vote!\n";
}
לעיתים נרצה שיהיה רק בלוק
else
.
במקום לכתוב :
"
אם א' נכון- אל תעשה כלום
אחרת - תעשה את ב'
"
יותר נורמלי לומר:
"
אם א' לא נכון - תעשה את ב'
"
להלן בדוגמא:
print "how old are you?";
$a=<
STDIN>;
chop (
$a);
unless (
$a <
18) {
print "you are old enough- so go vote!\n";
$voter++;
# סופרים את האנשים שהצביעו
}
גם ב
unless
יש
else.
להוספת תגובה, אנא התחברו לדרכונט.