my $item = qq~<tr>
	<td><font size=2><B><a href='javascript:void(0);' onClick="javascript:window.open('../exc_details.asp?PID=0000','Nyhet','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizeable=yes,width=380,height=500');" href="javascript:void(0);">EXCAVATOR</A></B></font></td>
	<td><font size=2>1 Jul 2010</font></td>
	<td><font size=2>10 Aug 2010</font></td>
	<td><font size=2><B>Shellshocked</B></font></td>
</tr>~;
      my $p=HTML::TokeParser->new(\$item);
      my $data = $p->get_text(['</td>']);
      print "$data\n";