Home  |  Linux  | Mysql  | PHP  | XML
From:John Delacour Date:Fri Nov  5 10:57:44 2004
Subject:Re: [MacPerl-AnyPerl] Filter a url
At 1:48 pm +0100 31/10/04, Eelco Alosery wrote:

>I want to filter a url from $ENV{'HTTP_REFERER'}
>If the url is http://www.testdomein.nl/test.html
>I only want a result testdomein.nl
>
>I have been testing whit this script
>$url =~ s/.*?\.(.+?)\/.*?/$1/is;
>
>It delets the first part of the url corect, but after .nl it deletes 
>the slash and not the remaining tekst.
>The result is testdomein.nltest.html
>
>What is it i do wrong.


Try something like this:

$_ ="http://www.testdomain.nl/test.html";

s~  [^\.]+.  ([^/]+)  /.+  ~$1~x;

print "$_$/";


JD




Navigate in group perl.macperl.anyperl at sever nntp.perl.org
Previous Next




  
© No Copyright
You are free to use Anything
Site Maintained by PHP Developer
Powered By PHP Consultants