امثلة على العبارات الشرطية SWITCH في لغة Perl
- 0/5
- 2020-10-13
توصيف
عبارة Switch :
تُستخدم عبارة حالة Switch لتجنب السلسلة الطويلة لعبارة if-else. إنه الشكل المبسط لبيان if-else المتداخلة.
تقارن قيمة المتغير بالحالات المتعددة ، وإذا تم العثور على تطابق ، فإنه ينفذ كتلة من العبارة المرتبطة بهذه الحالة المعينة.
مثال عن استخدام Switch :
use feature qw(switch say);
print "Enter a Number\n ";
chomp( my $grade = <> );
given ($grade) {
when ('10') { say 'It is 10' ;}
when ('20') { say 'It is 20' ;}
when ('30') { say 'It is 30' ;}
default { say 'Not 10, 20 or 30';}
}
