q'Sh         ELoV
   eSMeshEl     OvEsmeNO
  tsHeloVeSM   EShELOVESm
 eNOTShEloVes mESheLovesMe
noTsHELovEsMESHelOVeSmEnotS
HeLOVeSMESHElOvESMENotSHeLo
 VesmEShELovEsmENOTsHELOVE
  smEsHELOveSMeNoTshELOVe
   SmesHElOVesmEnOTSheLO
    vEsMeshELoVESmEnoTS
     HELOvEsM'=~/(((\w
      )\W*(?{$^R.(0+(
       q{a}lt$3))}))
        {8}(?{print
         +pack"B8"
          ,$^Rand
           ""}))
            +/x