求助： 查找质数的perl程序

求助： 查找质数的perl程序
刚开始自学perl：

看到查找质数的程序，自己运行总有问题，请朋友们看看哪里错了，先谢了。

程序如下：
#!/usr/bin/perl -w

$maxprimes=20;
$value=1;
$count=0
while ($count < $maxprimes) {
     $value++;
     $composite=0;
  for ($i=2; $i<$value; $i++) {
     for ($j=$i; $j<$value; $j++) {
        if (($j * $i)==$value) {
       $composite=1;
        last ;
        }
       }
      }
     if (! $composite) {
      $count++;
     print "$value is prime\n";
     }
}


运行后的问题：
syntax error at prime.pl line 6, near ") {"
syntax error at prime.pl line 21, near " }"


这个是怎么回事啊？

   

好像没人来啊，郁闷？ 好像没人来啊，郁闷？

$count=0--后面少了; $count=0
后面少了;
$count=0;

谢谢 麻辣
麻辣朋友，非常感谢你。

呵呵，看了错误，哭笑不得。自我检讨一下。