# replace all linktext # with [url="link"]linktext[/url] $var =~ s~]* > (.+?) ~\[url="$1"\]$2\[/url\]~gsx;