expand(qr/a(.)c/, 'abc', '"a$1$1c"');