お世話になります。
今日からPerlを勉強しているのですがわからないところがあるのでおしえてください。

$n=2;

while($n <= 100){

$div=2;
$prime=1;
#---------------------------------------------
while($div <= ($n/2)){

if(($n % $div) == 0){
$prime = 0;
Last;
}

++$div;
#--------------------------------
}

if($prime){
print "$n\n";
}

++$n;

}

$div; は#---のスコープ内だけが有効なのですか？
$n が３にカウントされると　$divもスコープの下の$div++で＋１されると考えたらよろしいのでしょうか？
ぜひ、教えてください。