如何使用Tcl regexp匹配空字符串？

我需要TCL正则表达式

regexp

在输入完全为空时返回1

---

我尝试了

regexp^（？！[\s\s]）

，但不起作用。

测试：

regexp{^（？）（）}

很好用。应该满足期望值（匹配空字符串/输入）

怎么样

regexp {^$} $data

?

也就是说，上次我检查时，运行emtpy字符串测试的最有效方法之一是使用：

---

还可以查看有关此主题的详细信息。为什么需要使用regexp来执行此操作？

expr {[string length $data] == 0}