Select Code to Download

<td><b>End Date</b></td>^M
<td><img src="http://welcome.hp-ww.com/img/s.gif" idth="1" height="1" 
+border="0" alt=""></td>^M
<td>^M
19 Jun 2012^M

my ($result) = $content =~ /End Date.*(\d\d \w\w\w \d\d\d\d)/;