Perl auswertung von Daten

[Oleg.de]

Help!
Habe ein Forum in Perl geschrieben, aber möchte das die Ankommende Daten nach http://www. ADRESSEN uberprüft werden und die sofort als Verveise ausgegeben werden z.B. Daten liegen in Variable:
$R{'frage'}= ??????????????????
wie kann ich die ausspliten und Web Adressen finden?
Danke für jede Hilfe !
So klapt nicht:
#$R{'frage'} =~ s/(\[URL\])(http:\/\/\S+?)(\[\/URL\])/ <A HREF="$2" TARGET=_blank>$2<\/A> /isg;
#$R{'frage'} =~ s/(\[URL\])(\S+?)(\[\/URL\])/ <A HREF="http:\/\/$2" TARGET=_blank>$2<\/A> /isg;
#$R{'frage'} =~ s/(\[EMAIL\])(\S+\@\S+?)(\[\/EMAIL\])/ <A HREF="mailto:$2">$2<\/A> /isg;
#$R{'frage'} =~ s/(\[i\])(.+?)(\[\/i\])/<i>$2<\/i>/isg;
#$R{'frage'} =~ s/(\[b\])(.+?)(\[\/b\])/<b>$2<\/b>/isg;

 

[Oleg.de]

???????????

Kann mir Jemand hier Helfen ?