$i=1;while ($i <= 10) { if ($i == 5) { print "\$i == $i\n"; next; } print "$i ";}continue {$i++;} # $i is incremented only once