fixed a syntax error

Janzert · Jun 22, 2011 · 55899a1 · 55899a1
1 parent d48091c
commit 55899a1
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/dict/dict_v1.pl b/dict/dict_v1.pl
@@ -1,8 +1,8 @@
 my (%h, $max);
 
 while (<>) {
-    next if ++$h{$_} > $max;
+    next if (++$h{$_} > $max);
     $max = $h{$_};
 }
 
-print keys %h . "\t$max\n";
+print scalar(keys(%h)), "\t$max\n";