candidate for TR18 compliance

[perl5.git] / lib / unicore / lib / gc_sc / QMark.pl

diff --git a/lib/unicore/lib/gc_sc/QMark.pl b/lib/unicore/lib/gc_sc/QMark.pl
new file mode 100644 (file)
index 0000000..9778cd9
--- /dev/null
+++ b/lib/unicore/lib/gc_sc/QMark.pl
@@ -0,0 +1,21 @@
+# !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
+# This file is built by mktables from e.g. UnicodeData.txt.
+# Any changes made here will be lost!
+
+#
+# Binary property 'Quotation_Mark'
+#
+return <<'END';
+0022           Quotation_Mark
+0027           Quotation_Mark
+00AB           Quotation_Mark
+00BB           Quotation_Mark
+2018   201F    Quotation_Mark
+2039   203A    Quotation_Mark
+300C   300F    Quotation_Mark
+301D   301F    Quotation_Mark
+FE41   FE44    Quotation_Mark
+FF02           Quotation_Mark
+FF07           Quotation_Mark
+FF62   FF63    Quotation_Mark
+END