$string =~ s/(https?:\/\/.*)(?:\s|\.)/<a href="\1">\1<\/a>/oig;