my $new = $old =~ s/cat/dog/r;
# $old is 'cat' and $new is 'dog'
-This is particularly useful with C<map>. See L<perlop> for more examples.
+This is particularly useful with C<map>. See L<perlop> for more examples
+(4f4d75, 000c65).
=head2 package block syntax