my $title = "This is the New Title cool_image.gif Tue Feb 8 09:43:17 2005";
if($title =~/(.*?)(\w+|\W+\.\w+)(.*?)/ig){

print "<br><b><font color=yellow>**1=$1 *2=$2 * 3=$3 *****</b></font><br>"; 
}else{print "<br><b><font color=yellow>1316 No ok match</b></font>";}