<div dir="ltr"><pre><font size="4">Fala galera,<br><br>Andando pelo CPAN achei este módulo que vai adiantar muito minha vida, mas me surgiu um porém, talvez falta de base XP<br><br>seguinte, até hoje eu tratava variáveis como $var e arrays como @arr, neste exemplo, vejo algo como @$arr, isso é válido??<br>
se sim significa simplesmente um array?<br><br>Valeu!<br><br><br><br><br><br>use HTML::TableContentParser;<br>  $p = HTML::TableContentParser-&gt;new();<br>        $html = read_html_from_somewhere();<br>  $tables = $p-&gt;parse($html);<br>
  for $t (@$tables) {<br>    for $r (@{$t-&gt;{rows}}) {<br><br><br>                        print &quot;Row: &quot;;<br>      for $c (@{$r-&gt;{cells}}) {<br>        print &quot;[$c-&gt;{data}] &quot;;                          <br>
      }                         <br>      print &quot;\n&quot;;                       <br><br><br>    }<br>  }</font></pre></div>