Help for this page

Select Code to Download


  1. or download this
    bytes($clob) ;
    bytes($convertedstr) ;
    ...
      use bytes ;
      print join(":", map(sprintf("%02X", $_), unpack('C*', $s))), " -- $w
    +\n" ;
    } ;