F: Use Perl 5 syntax for captured string in the replacement ...

... and mute "\1 better written as $1 ..." warning.