Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re^2: UTF8 Validity

by menolly (Hermit)
on Feb 21, 2008 at 19:57 UTC ( [id://669372] : note . print w/replies, xml ) Need Help??


in reply to Re: UTF8 Validity
in thread UTF8 Validity

Ah. I tried it based on this reply, in the other thread. Is there a module/regex/etc. that I can use to detect non-utf8 data in a string?

Replies are listed 'Best First'.
Re^3: UTF8 Validity
by Juerd (Abbot) on Feb 21, 2008 at 20:02 UTC

    Just try to decode something as UTF-8. If that fails, fall back to something else.

    For example:

    $foo = eval { decode("UTF-8", $foo, Encode::FB_CROAK) } || decode("CP1252", $foo);