#!/usr/bin/perl -w
use strict;
use warnings;

use XML::LibXML    qw( );
use LWP::UserAgent qw( );

sub text_to_xml {
   my ($text) = @_;
   $text =~ s/&/&/g;
   $text =~ s/</&lt;/g;
   return $text;
}

my $url = "http://www.marketwatch.com/story/brazil-mexico-stocks-face-quarterly-slides-2010-06-30?siteid=rss&rss=1";

my $ua = LWP::UserAgent->new();
my $response = $ua->get($url);
$response->is_success()
   or die "Request failed: ". $response->status_line() ."\n";

my $xhtml = $response->decoded_content(charset => "none");
$xhtml =~ s{(<script[^>]*>)(.*?)(</script>)}{"$1".text_to_xml("$2")."$3"}sieg;
$xhtml =~ s/&(?!#|[a-zA-Z0-9]{1,8};)/&amp;/g;

my $parser = XML::LibXML->new;
my $doc = $parser->parse_string($xhtml);

##</code><code>##

:527: validity error : ID alertaction already defined
="/tools/alerts/newsColumn.asp?selectedType=3&amp;column=Latin American Markets"
                                                                                ^
:528: validity error : ID emailaction already defined
_email.asp?guid={A353EEAC-9D0E-4F92-B3A8-2F9258B5CD34}&amp;dist=emailMidSection"
                                                                                ^
:529: validity error : ID printaction already defined
l="nofollow" href="/story/story/print?guid=A353EEAC-9D0E-4F92-B3A8-2F9258B5CD34"
                                                                                ^
:544: parser error : Opening and ending tag mismatch: td line 543 and tr
                        </tr>
                             ^
:547: parser error : Opening and ending tag mismatch: td line 546 and tr
                        </tr>
                             ^
:550: parser error : Opening and ending tag mismatch: td line 549 and tr
                        </tr>
                             ^
:553: parser error : Opening and ending tag mismatch: td line 552 and tr
                        </tr>
                             ^
:556: parser error : Opening and ending tag mismatch: td line 555 and tr
                        </tr>
                             ^
:557: parser error : Opening and ending tag mismatch: tr line 554 and table
    </table>
            ^
:558: parser error : Opening and ending tag mismatch: tr line 551 and div
</div>
      ^
:642: parser error : Opening and ending tag mismatch: tr line 548 and div
                                </div>
                                      ^
:1358: parser error : Opening and ending tag mismatch: tr line 545 and div
                </div>
                      ^
:1360: parser error : Opening and ending tag mismatch: tr line 542 and div
        </div>
              ^
:1985: parser error : Opening and ending tag mismatch: table line 541 and div
</div>
      ^
:2060: parser error : Attribute border redefined
olling="no" allowtransparency="true" marginheight="0" marginwidth="0" border="0"
                                                                                ^
:2167: parser error : Opening and ending tag mismatch: div line 2159 and p
                </p>
                    ^
:2168: parser error : Opening and ending tag mismatch: form line 2148 and div
        </div>
              ^
:2171: parser error : Opening and ending tag mismatch: div line 2147 and form
</form>
       ^
:2198: parser error : Opening and ending tag mismatch: div line 2190 and p
                </p>
                    ^
:2199: parser error : Opening and ending tag mismatch: form line 2179 and div
        </div>
              ^
:2202: parser error : Opening and ending tag mismatch: div line 2178 and form
</form>
       ^
:2241: parser error : Opening and ending tag mismatch: div line 2233 and p
                </p>
                    ^
:2242: parser error : Opening and ending tag mismatch: form line 2222 and div
        </div>
              ^
:2245: parser error : Opening and ending tag mismatch: div line 2221 and form
</form>
       ^
:2513: parser error : Opening and ending tag mismatch: div line 110 and body
  </body>
         ^
:2514: parser error : Opening and ending tag mismatch: div line 87 and html
</html>
       ^
:2515: parser error : Premature end of data in tag body line 79

^
:2515: parser error : Premature end of data in tag html line 2

^