Try another module like HTML::TableExtract?

use strict;
use warnings;
use Data::Dumper;
use HTML::TableExtract;

my $te = HTML::TableExtract->new( decode => 0 ); 
$te->parse( do{ local $/; <DATA> } );

my ($first) = $te->tables;
print Dumper (($first->rows)[0]);

__DATA__
*insert your HTML here*
[download]

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)