Skip to content

Instantly share code, notes, and snippets.

@tobyink
Created March 4, 2013 13:11
Show Gist options
  • Select an option

  • Save tobyink/5082137 to your computer and use it in GitHub Desktop.

Select an option

Save tobyink/5082137 to your computer and use it in GitHub Desktop.
<tr class="class">
<td style="width:8%;"><a href="page.com" class="hyperlink">ABC</a></td>
<td style="width:10%;">1</td>
<td style="width:8%;">2</td>
<td style="width:8%;">3</td>
<td style="width:8%;">4</td>
<td style="width:8%;">5</td>
<td style="width:8%;">6</td>
<td style="width:12%;">7</td>
</tr>
<tr class="class">
<td style="width:8%;"><a href="page2.com" class="hyperlink">ABD</a></td>
<td style="width:10%;">1</td>
<td style="width:8%;">2</td>
<td style="width:8%;">3</td>
<td style="width:8%;">4</td>
<td style="width:8%;">5</td>
<td style="width:8%;">6</td>
<td style="width:12%;">7</td>
</tr>
use v5.10;
use strict;
use warnings;
use HTML::HTML5::Parser;
use XML::LibXML::QuerySelector;
my $doc = HTML::HTML5::Parser->load_html(location => "my.html");
say $->textContent for $doc->querySelectorAll('a.hyperlink');
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment