Perl Table Parser

[Hartmann]

Hallo!

Ich lese mit Perl eine HTML Seite in $contents ein, welche eine Tabelle in folgendem Format enthält.

  
<tbody>  
	<tr bgcolor="#c9d9f5">  
		<td colspan="2">  
		<div><strong>Montag, 9.11.2009</strong></div>  
		</td>  
	</tr>  
	<tr bgcolor="#e7ebf3">  
		<td>  
		<div><strong>1</strong></div>  
		</td>  
		<td>  
		<p><strong>Gegrilltes Putenbrustfilet</strong></p>  
		<p>Bedienstete 3,80 € | Gäste 4,60 €</p>  
		</td>  
	</tr>  
	<tr bgcolor="#bac4e0">  
		<td>  
		<div><strong>2</strong></div>  
		</td>  
		<td>  
		<p><strong>Rinderhacksteak</strong></p>  
		<p><em>Fleischlose Alternative:<br /></em><strong><strong>Vollkorn-Pilz-Bratling</strong></strong></p>  
		<p>Bedienstete 3,50 € | Gäste 4,35 €</p></td>  
	</tr>  
  
</tbody>  

Jetzt habe ich herausgefunden, dass mit HTML::TableParser daraus die Daten liest. Jedoch verstehe ich nicht, wie ich den TableParser benutze.

Am Ende möchte ich ein Array mit Datum, dem Gericht und zu Jedem Gericht den Preis. Alles als String

Kann mir Jemand dabei weiterhelfen?
Ich komme einfach nicht mehr weiter.