perl-unicode

Re: de-utf8-ing a string

2007-10-17 14:27:29
E R skribis 2007-10-17 15:56 (-0500):
  for (my $i = 0; $i < length($x); $i++) {
    $new .= chr(ord(substr($x, $i, 1)));
  }

utf8::downgrade();
-- 
Met vriendelijke groet,  Kind regards,  Korajn salutojn,

  Juerd Waalboer:  Perl hacker  <#####(_at_)juerd(_dot_)nl>  
<http://juerd.nl/sig>
  Convolution:     ICT solutions and consultancy 
<sales(_at_)convolution(_dot_)nl>

<Prev in Thread] Current Thread [Next in Thread>