Gobble rest of line with a scalar, not a hash.
authordrepper <drepper>
Sat, 28 Mar 1998 06:49:35 +0000 (06:49 +0000)
committerdrepper <drepper>
Sat, 28 Mar 1998 06:49:35 +0000 (06:49 +0000)
iconvdata/gap.pl

index 01ee9b2..ed2d295 100644 (file)
@@ -1,6 +1,6 @@
 $first=$last=$idx=0;
 while (<>) {
-  local($ucs,%rest) = split;
+  local($ucs,$rest) = split;
   local($u)=hex($ucs);
   if ($u - $last > 6) {
     if ($last != 0) {