Perl while är en form av loop som itererar så länge ett villkor är sant . Instruktioner
1
Initiera while-slingan genom att ange när nyckelordet
2
Ange fortsätta under förutsättning att slingan i parentes efter när nyckelordet : .
Medan ( $ ok) Addera 3
Ge de uttalanden som ska köras varje gång genom öglan inom klammerparenteser :
while ( $ ok)
{
: $ ok = OK ( ) ;
}
4
Lägg ut en valfri continue klausul efter slingan , för att ange uppgifter som skall utföras efter kroppen , men innan när villkoret utvärderas < . br > Addera ditt