<div>
If you can count on the HTML being fairly consistent (eg: first td always has first href, second td has second href, third td has date, forth has column after date, fifth has pages), then you could do it with a regex. &nbsp;If the data could be more varied, then you would use an HTML parser.
</div>


<div>
it's always very consistent, what would be the correct regex? thanks
</div>


<div>
<br />

<pre><code class="code-1 nolinks" id="code-123062"><span>$_='&lt;td class=&quot;img&quot;&gt;&lt;a href=&quot;/page/abcd/&quot;&gt;&lt;img src=&quot;/static/asjsjs.png&quot; alt=&quot;abcd123&quot; /&gt;&lt;/a&gt;&lt;/td&gt;&lt;td class=&quot;name&quot;&gt;&lt;a href=&quot;/gsgs/asdatacot/&quot;&gt;abcddd&lt;/a&gt;&lt;/td&gt;&lt;td class=&quot;date&quot;&gt;Mar 30, 2008&lt;/td&gt;&lt;td&gt;dhhfdf&lt;/td&gt;&lt;td class=&quot;pages&quot;&gt;104&lt;/td&gt;&lt;/tr&gt;';</span>
<span> </span>
<span>my ($h1, $h2, $date, $next, $page) =</span>
<span> /href=&quot;(.*?)&quot;.*?href=&quot;(.*?)&quot;.*?date&quot;&gt;(.*?)&lt;\/td&gt;&lt;td&gt;(.*?)&lt;\/td&gt;.*?&gt;(.*?)&lt;/;</span>
<span> </span>
<span>print &quot;h1=$h1\nh2=$h2\ndate=$date\nnext=$next\npage=$page\n&quot;;</span>
</code></pre>
</div>


<div>
thanks adam! and to go through all the files in a directory and save a file for each of them only with the cleaned output? 
</div>


<div>
it should only extract the pattern after a ...
</div>


<div>
<br />

<pre><code class="code-10 nolinks" id="code-123075"><span>local $/;</span>
<span>foreach &lt;*&gt; {</span>
<span>    open(my $in, &quot;&lt;$_&quot;) or warn &quot;could not open $_: $!\n&quot;,next;</span>
<span>    open(my $out, &quot;&gt;$_.results&quot;) or warn &quot;could not open $_.results: $!\n&quot;,next;</span>
<span>    my $data=&lt;$in&gt;;</span>
<span>    $data =~ s/.*?&lt;tbody&gt;(.*?)&lt;/tbody&gt;.*/$1/s;</span>
<span>    while($data =~ /href=&quot;(.*?)&quot;.*?href=&quot;(.*?)&quot;.*?date&quot;&gt;(.*?)&lt;\/td&gt;&lt;td&gt;(.*?)&lt;\/td&gt;.*?&gt;(.*?)&lt;/g) {</span>
<span>        print $out &quot;h1=$1\nh2=$2\ndate=$3\nnext=$4\npage=$5\n&quot;;</span>
<span>    }</span>
<span>    close($in);</span>
<span>    close($out);</span>
<span>}</span>
</code></pre>
</div>


<div>
I receive this error<br />
<br />
Scalar found where operator expected at cleaner.pl line 6, near &quot;s/.*?(<br />
.*?).*/$1&quot;<br />
syntax error at believers.pl line 2, near &quot;foreach &lt;*&gt;&quot;<br />
syntax error at believers.pl line 6, near &quot;s/.*?(.*?).*/$1&quot;<br />
Execution of cleaner.pl aborted due to compilation errors.
</div>


<div>
<div class="content wysiwyg-content">
I have some html files that have at some point a table, delimited in the code with<br />
<br />
&lt;tbody&gt;.....&lt;/tbody&gt;<br />
<br />
I would like to extract the values in each column and each row. The rows are delimited with &lt;tr&gt;.... &lt;/tr&gt;<br />
<br />
and my pattern is the following:<br />
<br />
&lt;td class=&quot;img&quot;&gt;&lt;a href=&quot;/page/abcd/&quot;&gt;&lt;img src=&quot;/static/asjsjs.png&quot; alt=&quot;abcd123&quot; /&gt;&lt;/a&gt;&lt;/td&gt;&lt;td class=&quot;name&quot;&gt;&lt;a href=&quot;/gsgs/asdatacot/&quot;&gt;ab<wbr />cddd&lt;/a&gt;&lt;/<wbr />td&gt;&lt;td class=&quot;date&quot;&gt;Mar 30, 2008&lt;/td&gt;&lt;td&gt;dhhfdf&lt;/td&gt;&lt;t<wbr />d class=&quot;pages&quot;&gt;104&lt;/td&gt;&lt;/tr<wbr />&gt;<br />
<br />
from each line like the one above I need to extract:<br />
<br />
1) the 1st href link: /page/abcd/<br />
2) the 2nd href link: /gsgs/asdatacot/ &nbsp; &nbsp;and its name &nbsp;&quot;abcddd&quot;<br />
3) the date: Mar 30, 2008<br />
4) the column after the date: dhhfdf<br />
5) the number of &quot;pages&quot;: 104<br />
<br />
what is the best way to do that with perl?<br />
<br />
thanks!!!!
</div>
</div>


I have some html files that have at some point a table, delimited in the code with

<tbody>.....</tbody>

I would like to extract the values in each column and each row. The rows are delimited with <tr>.... </tr>

and my pattern is the following:

<td class="img"><a href="/page/abcd/"><img src="/static/asjsjs.png" alt="abcd123" /></a></td><td class="name"><a href="/gsgs/asdatacot/">abcddd</a></td><td class="date">Mar 30, 2008</td><td>dhhfdf</td><td class="pages">104</td></tr>

from each line like the one above I need to extract:

1) the 1st href link: /page/abcd/
2) the 2nd href link: /gsgs/asdatacot/    and its name  "abcddd"
3) the date: Mar 30, 2008
4) the column after the date: dhhfdf
5) the number of "pages": 104

what is the best way to do that with perl?

thanks!!!!

extract data from a html table

Perl is a high-level, general-purpose, interpreted, dynamic programming languages with over 25 years of development. Perl 5 runs on over 100 platforms from portables to mainframes and is suitable for both rapid prototyping and large-scale development projects.  Perl gained widespread popularity as a Common Gateway Interface (CGI) scripting language, in part due to its regular expression and string parsing abilities. In addition to CGI, Perl is used for graphics programming, system administration, network programming, finance, bioinformatics, and other applications.

Perl

Python is a widely used general-purpose, high-level programming language. Its design philosophy emphasizes code readability, and its syntax allows programmers to express concepts in fewer lines of code than would be possible in other languages. Python supports multiple programming paradigms, including object-oriented, imperative and functional programming or procedural styles. It features a dynamic type system and automatic memory management and has a large and comprehensive set of standard libraries, including NumPy, SciPy, Django, PyQuery, and PyLibrary.