print utf8::is_utf8($your_string);