Can anyone convert this Perl match to PHP?

Hi all,

Just need a bit of help converting this Perl match into PHP preg_replace’s.


$printable_name =~ s/(\w+)/\u\L$1/g;
$printable_name =~ s/\b(And|Of|The|S)\b/\l$1/g;
$printable_name =~ s/'/\\'/;

At the moment, I’ve got:


$name = preg_replace("/(\w+)/", "\u\L$1/g", $name);
$name = preg_replace("/\b(And|Of|The|S)\b/","\l$1/g", $name);
$name = preg_replace("/'/", "\\'/", $name, 1);

But my regular expressions are rusty, let alone working from Perl to PHP.
Cheers in advance,

Ben