امثلة على الحلقات DO WHILE LOOP في لغة Perl
- 2020-10-14
توصيف
حلقة do while :
تقوم do while loop بتنفيذ كتلة من العبارة أولاً ثم تتحقق من الحالة. اذا عاد الشرط صحيحًا ، فستواصل الحلقة تكرارها.
إنها مشابهة لـ while loop ولكن الاختلاف الوحيد هو أنه في حلقة do-while سيتم تنفيذ كتلة من العبارات داخل جسم الحلقة مرة واحدة على الأقل.
برنامج يطبع الاعداد من 1 الى 10 :
$i = 1;
# do...while loop execution
do{
printf "$i\n";
$i++;
}while( $i <= 10 );
مثال عن nested do while :
$i = 1;
# do...while loop execution
do{
$j = 1;
do{
printf "$i $j\n";
$j++;
}while( $j <= 3 );
$i++;
}while( $i <= 3 );
مثال عن do while لا نهائية :
do{
printf "Infinitive do-while Loop\n";
}while( true ); 