UCD.pm: Clean up some pattern boundary conditions

Like using \z instead of $, and some were missing.

Spotted by Lukas Mai

Author: khwilliamson

charclass_invlists.inc

@@ -436006,7 +436006,7 @@ static const U8 WB_table[23][23] = {
 #endif	/* defined(PERL_IN_REGEXEC_C) */
 
 /* Generated from:
- * 3d3ab72e1b33c2e0467491bc7ff92c2bc35e0533ed7f76ed0cd4f81f1f12fd71 lib/Unicode/UCD.pm
+ * 92b3b0b73e402a9efee67f10380c390638c080fdde7430665e57abdac2fa976f lib/Unicode/UCD.pm
  * eb840f36e0a7446293578c684a54c6d83d249abde7bdd4dfa89794af1d7fe9e9 lib/unicore/ArabicShaping.txt
  * 333ae1e99db0504ca8a046a07dc45b5e7aa91869c685e6bf955ebe674804827a lib/unicore/BidiBrackets.txt
  * b4b9e1d87d8ea273613880de9d2b2f0b0b696244b42152bfa0a3106e7d983a20 lib/unicore/BidiMirroring.txt

lib/Unicode/UCD.pm

@@ -3848,7 +3848,7 @@ RETRY:
     # below to add in the algorithmic-defined name entries.
     # And NFKCCF NFKCSCF need conversion, so handle those here too.
     if (ref $swash eq ""
-        || $swash->{'TYPE'} =~ / ^ To (?: Blk | Na | NFKCS?CF ) $ /x)
+        || $swash->{'TYPE'} =~ / ^ To (?: Blk | Na | NFKCS?CF ) \z /x)
     {
 
         # Get the short name of the input property, in standard form
@@ -4045,11 +4045,11 @@ RETRY:
             }
             $swash = \%decomps;
         }
-        elsif ($second_try !~ /nfkcs?cf/) { # Don't know this property. Fail.
+        elsif ($second_try !~ /^nfkcs?cf\z/) { # Don't know this property. Fail.
             return;
         }
 
-        if ($second_try =~ / ^ (?: nfkcs?cf | dm ) $ /x) {
+        if ($second_try =~ / ^ (?: nfkcs?cf | dm ) \z /x) {
 
             # The 'nfkccf' property is stored in the old format for backwards
             # compatibility for any applications that has read its file
@@ -4180,7 +4180,7 @@ RETRY:
             } # End of loop constructing the converted list
 
             # Finish up the data structure for our converted swash
-            my $type = ($second_try =~ /\b ( nfkcs?cf ) \b /x)
+            my $type = ($second_try =~ / ^ ( nfkcs?cf ) \z /x)
                        ? 'To' . $1
                        : 'ToDm';
             $revised_swash{'LIST'} = $list;

lib/unicore/uni_keywords.pl

@@ -29,7 +29,7 @@
 #define MAX_FOLD_FROMS 3
 
 /* Generated from:
- * 3d3ab72e1b33c2e0467491bc7ff92c2bc35e0533ed7f76ed0cd4f81f1f12fd71 lib/Unicode/UCD.pm
+ * 92b3b0b73e402a9efee67f10380c390638c080fdde7430665e57abdac2fa976f lib/Unicode/UCD.pm
  * eb840f36e0a7446293578c684a54c6d83d249abde7bdd4dfa89794af1d7fe9e9 lib/unicore/ArabicShaping.txt
  * 333ae1e99db0504ca8a046a07dc45b5e7aa91869c685e6bf955ebe674804827a lib/unicore/BidiBrackets.txt
  * b4b9e1d87d8ea273613880de9d2b2f0b0b696244b42152bfa0a3106e7d983a20 lib/unicore/BidiMirroring.txt