אופרטורים של השוואה

ב-Perl הערכים "", 0 ו-undef מוגדרים כ-False וכל ביטוי אחר מוגדר כ-True. (הגדרה מדוייקת יותר תינתן בהמשך).

ב-Perl ניתן להשתמש באופרטורים גם על ידי סימני האופרטורים >, < וכו' וגם על ידי מילים בעלות אותה משמעות.

הטבלה הבאה מרכזת את אופרטורי ההשוואה השונים של השפה.

אנו מניחים בטבלה כי אנו מריצים את הביטוי $left <OP> $right, כאשר OP היא הפעולה הנדונה בכל שורה בטבלה.

האופרטור

סימון

סימון מילולי

ערך מוחזר

קטן מ-

>

lt

1 אמ"מ $left קטן מ-$right

קטן או שווה

<=

le

1 אמ"מ $left קטן או שווה מ-$right

גדול מ-

<

gt

1 אמ"מ $left גדול מ-$right

גדול או שווה

>=

ge

1 אמ"מ $left גדול או שווה מ-$right

שווה

==

eq

1 אמ"מ $left שווה ל-$right

שונה

!=

ne

1 אמ"מ $left שונה מ-$right

השוואה

<=>

cmp

-1 אמ"מ $left קטן מ-$right,

0 אמ"מ $left שווה ל-$right

1 אמ"מ $left גדול מ-$right

דוגמא:

use strict;
use warnings;


my $a = 5; my $b = 50;
$a < $b;                 # evaluates to 1
$a >= $b;                # evaluates to ""
$a <=> $b;               # evaluates to -1

my $c = "hello"; my $d = "there";
$d cmp $c;               # evaluates to 1
$d ge  $c;               # evaluates to 1
$c cmp "hello";          # evaluates to ""

מאת: עודד

אופרטורים

עמוד 12!!!
מאת: עודד

אופרטורים

אין טבלת אופרטורים בעמוד!!!
מאת: MoShiKy

טעויות כתיב

אם יש לך זמן כדאי שתתקן את השגיאות הבאות במסמך:
עמ' 20- "אם זאת" => "עם זאת"
עמ' 21- "אל הרשימ" => "אל הרשימה"

EOC
שיתוף:
| עוד