use v6; $_ = chr(65); .say; s/{"here".say; chr(65)}/B/; .say;" # outputs A here BA