雖然PCRE引擎確實支持遞歸正則表達式，但您無法在ICU引擎上使用正則表達式（例如Apple使用的），無需額外代碼即可實現此目的。你需要做這樣的事情：

這可以檢測任何回文，但確實需要一個循環（這是必需的，因為正則表達式不能計數）。

$a = "teststring";while(length $a > 1){
   $a =~ /(.)(.*)(.)/;
   die "Not a palindrome: $a" unless $1 eq $3;
   $a = $2;}print "Palindrome";

這是不可能的。回文不是由常規語言定義的。（參見，我在計算理論中學到了一些東西）