programming-examples/perl/Statement/if in a while loop.pl

$i=1;
while ($i <= 10){
     if ($i==5){
        print "\$i == $i\n";
        $i++;      
        next;
     }
     print "$i ";
     $i++;         
}