in reply to s/// to replace HTTP address with a space

Regexp::Common::URI::http might help make things easy, too: 
use Regexp::Common qw /URI/;
$text =~ s/$RE{URI}{HTTP}/ /sg;

[download]

In Section Seekers of Perl Wisdom