Ok, thank you all.
Finally I've done it like this:

use Encode;
use Encode::Guess;

my $decoder = guess_encoding($content);
print "UTF-8" if ref($decoder) eq 'Encode::utf8';

Octavian

  ----- Original Message ----- 
  From: Igor Sutton 
  To: Octavian Rasnita 
  Cc: beginners@perl.org 
  Sent: Wednesday, January 03, 2007 5:46 PM
  Subject: Re: detecting a UTF-8 string


  2007/1/3, Octavian Rasnita <[EMAIL PROTECTED]>:
    Hi,

    I want to check if a certain string is UTF-8 or not.

  Maybe you want Encode::Guess[1].

  [1] http://search.cpan.org/~dankogai/Encode-2.18/lib/Encode/Guess.pm 


  -- 
  Igor Sutton Lopes < [EMAIL PROTECTED]> 

Reply via email to