andre.cruz@blogs1:~$  perl -e 'use Encode; use LWP::Simple; use Data::Dumper; my $html = get("http://ljsapo.blogspot.com/feeds/posts/full"); use XML::Simple; my $parsed = XMLin($html); my $text = $parsed->{"entry"}->{"tag:blogger.com,1999:blog-20104370.post-115522283622549946"}->{"content"}->{"content"}; print Dumper(Encode::is_utf8($text));'
$VAR1 = '1';
andre.cruz@blogs1:~$