$ perl -e 'print "\Uab,cd\Qef,gh\Lij,kl\Emn,op\Eqr,st\Euv,wx\n";' AB,CDEF\,GHij,klmn,opqr,stuv,wx