title: Parsing whole table in Perl using TableExtract
body: <p>I want to parse whole table using TableExtract in Pearl. This is what I wrote in Perl:</p>
  
  <pre><code>use HTML::TableExtract;
  use LWP::Simple;
  use Data::Dumper;
  
  my $te  = new HTML::TableExtract( depth=&gt;3, count=&gt;3, gridmap=&gt;0);
  my $content = get("C:/Users/admin/Desktop/tabela.html");
  $te-&gt;parse($content);
  
  foreach $ts ($te-&gt;table_states)
  {
      print $ts;
      foreach $row ($ts-&gt;rows)
      {
           print Dumper $row;
           #print Dumper $row if (scalar(@$row) == 2);
      }
  }
  </code></pre>
  
  <p>and this is how file "tabela.html" looks:</p>
  
  <pre><code>&lt;table width=100% align=center cellspacing=0 cellpadding=0 class='raspored_1x2'&gt;&lt;tr class=svetlija&gt;&lt;td align=center width=20% &gt;02.03.2011 20:30&lt;/td&gt;&lt;td align=center width=5% &gt;261&lt;/td&gt;&lt;td align=right width=21% &gt;AUSTRIA W.&lt;/td&gt;&lt;td align=center width=2% &gt;-&lt;/td&gt;&lt;td align=left width=21% &gt;STURM&lt;/td&gt;&lt;td align=right width=8%&gt;
              &lt;a title="dodaj u tiket" href=?option=com_content&amp;amp;task=view&amp;amp;id=24&amp;amp;Itemid=31&amp;amp;sport=Fudbal&amp;amp;a=add&amp;amp;rb=261-5018-2011&amp;amp;dom=AUSTRIA+W.&amp;amp;gost=STURM&amp;amp;tip=1&amp;amp;kvota=1.80&gt;1.80&lt;/a&gt;&lt;/td&gt;&lt;td align=right width=8% &gt;
              &lt;a title="dodaj u tiket" href=?option=com_content&amp;amp;task=view&amp;amp;id=24&amp;amp;Itemid=31&amp;amp;sport=Fudbal&amp;amp;a=add&amp;amp;rb=261-5018-2011&amp;amp;dom=AUSTRIA+W.&amp;amp;gost=STURM&amp;amp;tip=X&amp;amp;kvota=3.30&gt;3.30&lt;/a&gt;&lt;/td&gt;&lt;td align=right width=8% &gt;
              &lt;a title="dodaj u tiket" href=?option=com_content&amp;amp;task=view&amp;amp;id=24&amp;amp;Itemid=31&amp;amp;sport=Fudbal&amp;amp;a=add&amp;amp;rb=261-5018-2011&amp;amp;dom=AUSTRIA+W.&amp;amp;gost=STURM&amp;amp;tip=2&amp;amp;kvota=3.90&gt;3.90&lt;/a&gt;&lt;/td&gt;&lt;td width=7%&gt;
              &lt;a title='Pogledaj kvote' href='javascript:void(0)' onclick="prikaziKvote('261-5018-2011')"&gt;
              &lt;img src="http://www.balkanbet.co.rs/site/templates/balkanbet_green/images/arrow_down.gif" class='strelica'&gt;
              &lt;/a&gt;
              &lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;
  </code></pre>
  
  <p>When I run perl script nothing happen. Has anyone idea what is the problem?</p>