امثلة على الحلقات DO WHILE LOOP في لغة Perl

• 2020-10-14
• daafoor

• برمجة | Programming
• اكواد برمجية برمجة
• برمجة بيرل | Perl programming
• اكواد برمجية برمجة بيرل
• اكواد برمجية

$i = 1;  
# do...while loop execution  
do{  
   printf "$i\n";  
   $i++;  
}while( $i <= 10 );  

$i = 1;  
# do...while loop execution  
do{  
   $j = 1;  
   do{  
   printf "$i $j\n";  
   $j++;  
}while( $j <= 3 );  
$i++;  
}while( $i <= 3 ); 

do{  
   printf "Infinitive do-while Loop\n";  
}while( true );