Perl programming related question.
Lázaro Morales
lazaro at frioclima.com.cu
Thu Aug 16 16:09:35 UTC 2012
Some time ago, Chris Adams said:
> Of course, being perl, there's more than one way to do it.
>I would do something like:
> my ($file) = $url =~ m!^http://[^/]+/(.*)!;
>That would strip off the leading protocol/host, leaving the rest. If
> there was a subdirectory in the URL (e.g. http://host/some/file.zip) the
> above would result in $file = "some/file.zip".
>If you always only want the last part (following any slashes):
> my ($file) = $url =~ m!([^/]+)$!;
>This would take http://host/some/file.zip and give $file = "file.zip".
Wow!, fantastic solution, thanks very much Chris.
*****************************************************************************
* Este mensaje de correo electrónico ha sido procesado por el *
* Servidor de Correo Electrónico de Frioclima y es un correo *
* válido para el dominio: frioclima.com.cu *
*****************************************************************************
More information about the users
mailing list