Linux% perl -c 665749.pl
Sequence (?T...) not recognized in regex; marked by <-- HERE in m/(?T <-- HERE he Purl Caretakers' John)/