Re: How do I replace a URL with a clickable hyperlink?

in reply to How do I replace a URL with a clickable hyperlink?

$text = <<TEXT;
Hello World http://www.world.com/index.htm
http://foo.com http://bar.com
TEXT

($links = $text) =~ s!(http://[^\s]+)!<a href="$1">$1</a>!gi;

print $text,"\n\n",$links;
[download]

Comment on Re: How do I replace a URL with a clickable hyperlink? Download Code

Replies are listed 'Best First'.
Re: Answer: How do I replace a URL with a clickable hyperlink? by merlyn (Sage) on Feb 14, 2002 at 16:12 UTC
This is wrong, of course, for unusual links that contain HTML-nasty characters, unless you presume that the input contains no quotes and is already HTML-safe. -- Randal L. Schwartz, Perl hacker	[reply]

In Section Seekers of Perl Wisdom