else { /* TARG == left */
    STRLEN llen;
    SvGETMAGIC(left);		/* or mg_get(left) may happen here */
    if (!SvOK(TARG)) {
        if (left == right && ckWARN(WARN_UNINITIALIZED))
            report_uninit(right);
        sv_setpvn(left, "", 0);
    }
    (void)SvPV_nomg_const(left, llen);   /* Needed to set UTF8 flag */
    lbyte = !DO_UTF8(left);
    if (IN_BYTES)
        SvUTF8_off(TARG);
}

##</code><code>##

>perl -MDevel::Peek -e"sub f { my $s; Dump $s if $i++; $s='abc' } f;f"
SV = PV(0x238e44) at 0x182ee40
  REFCNT = 1
  FLAGS = (PADBUSY,PADMY)
  PV = 0x18250bc "abc"\0
  CUR = 3
  LEN = 4