Select Code to Download

<ul><li>The following Internet Connections were established:</li></ul>
<p><table class="tbl" cellpadding="5" cellspacing="0">
...
<tr><td class="cell_1">127.0.0.2</td><td class="cell_1">80</td><td cla
+ss="cell_1">127.0.0.2</td><td class="cell_2">127.0.0.2</td></tr>
<tr><td class="cell_1">127.0.0.3</td><td class="cell_1">80</td><td cla
+ss="cell_1">127.0.0.3</td><td class="cell_2">127.0.0.3</td></tr>
<tr><td class="cell_1">127.0.0.4</td><td class="cell_1">80</td><td cla
+ss="cell_1">127.0.0.4</td><td class="cell_2">127.0.0.4</td></tr>

$node->findvalue('tr') or next;
$text =~ m/^The following Internet Connections were established/ or ne
+xt;
my @array = $node->findvalues('td/tr');