--- trunk/back2html.pm	2003/02/23 07:04:36	27
+++ trunk/back2html.pm	2003/07/04 21:35:34	65
@@ -11,10 +11,11 @@
 	foreach $line (split(/###/,$html)) {
 		$out .= "<tr><td>";
 		my @items = split(/#-#/,$line);
+		$items[1] =~ s#(.*)\b(http://[\w\./]+)(\b?.*)#$1<a href=\"$2\">$2</a>$3#g;
 		$out .= join("</td><td>",@items);
 		$out .= "</td></tr>\n";
 	}
-	$out =~ s/&lt;br/*&gt;/<br\/>/g;
+	$out =~ s/&lt;br\/*&gt;/<br\/>/g;
 	return $out;
 }