Add missing strict vars to mktables

Author: toddr

lib/unicore/mktables

@@ -17425,7 +17425,7 @@ $loose_names
 
     # And the following array gives the inverse mapping from code points to
     # names.  Lowest code points are first
-    \@code_points_ending_in_code_point = (
+    my \@code_points_ending_in_code_point = (
 $code_points_ending_in_code_point
     );
 
@@ -17556,7 +17556,7 @@ END
             my $L = $LBase + $SIndex / $NCount;
             my $V = $VBase + ($SIndex % $NCount) / $TCount;
             my $T = $TBase + $SIndex % $TCount;
-            $name = "$HANGUL_SYLLABLE$Jamo{$L}$Jamo{$V}";
+            my $name = "$HANGUL_SYLLABLE$Jamo{$L}$Jamo{$V}";
             $name .= $Jamo{$T} if $T != $TBase;
             return $name;
         }