--- trunk/back2html.pm	2003/02/23 07:11:18	31
+++ trunk/back2html.pm	2003/07/04 21:35:34	65
@@ -11,6 +11,7 @@
 	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";
 	}