Code:
var %x = 1, %urls , %regx = /((http|irc|ftp)://(.*?)(\040|\z))/g
while (%x <= $regex($1-,%regx)) {
  %urls = $addtok(%urls, $regml(%x),32) 
  inc %x
}
msg #newchan %urls
}

matches also if there is more then 1 link in the text.

Last edited by Mpdreamz; 14/06/05 02:06 PM.