$a = "[URL]http://www.perl-community.de[/URL]; @1 = split ('[URL]',$a); @2 = split ('[/URL]',$1[1]); $link = $2[0]; print $link;