#!/usr/bin/perl
use strict;
use warnings;
use HTML::TokeParser;

my $Text;
{ local $/; $Text = <DATA>; }

my $p = HTML::TokeParser->new( \$Text );

while ( my $token = $p->get_tag('td') ) {
	my $txt = $p->get_trimmed_text("/td");
	print $txt,"\n";	
}

__DATA__
...<tr><td colspan="3">
<span><strong>SomeNameHere</strong></span> <span class="small">(Transaction ID #5HN04039SW052A35R)</span><br><br>
</td></tr>
<tr><td colspan="3"><hr class="dotted"></td></tr>
<tr><td colspan="3"><br class="h10"></td></tr>
...<td class="item-title" width="40%">Name of the first item</td>
<td align="center" class="qty" width="9%">14</td>...
<tr><td colspan="3"><hr class="dotted"></td></tr>
<tr><td colspan="3"><br class="h10"></td></tr>
...<td class="item-title" width="40%">Name of the second item</td>
<td align="center" class="qty" width="9%">12</td>...