diff --git a/tests/data/string.ccl b/tests/data/string.ccl
index 69dd884c6e5eca3f4b1de6e259c49225cd28688c..7aa3136f555aaca8ec75ca4551c27eacbc5bf02f 100644
--- a/tests/data/string.ccl
+++ b/tests/data/string.ccl
@@ -24,3 +24,19 @@ affix(["psi", "pies"], 0)
 
 ["pies", "psi"]
 ---
+regex(["ökonomisch", "ökologisch", "oko", "okoń", "ok"], "\\p{Ll}+")
+
+True
+---
+regex(["ökonomisch", "ökologisch", "okoŃ", "okoń", "ok"], "\\p{Ll}+")
+
+False
+---
+regex(["SCHLÜSSEL.", "OKOŃ;", "ŹDŹBŁO:"], "\\p{Lu}+\\p{P}")
+
+True
+---
+regex(["SCHLÜSSEL.", "OKOń;", "ŹDŹBŁO:"], "\\p{Lu}+\\p{P}")
+
+False
+---