my $tree = HTML::TreeBuilder->new();
my %rules;
my @all_normal;
my @all_normal_lists;

%rules->{'test1'} = "'_tag' => 'ol', 'class' => 'nobr'";
%rules->{'test2'} = "'_tag' => 'ul', 'class' => 'cfgr3'";

$tree->parse_content($sContent);
	
@all_normal_lists = $tree->look_down(%rules->{'test1'});