$_ =~
http://www.google.com
<a href="http://www.google.com">fail a match here</a>
~;

s#^(http://\S+)#<a href="$1">$1</a>#gmsi;
print;