DB<3> $r="abc|xyz";

  DB<4> $rx=qr($r);

  DB<5> p $rx
(?^u:abc|xyz)