if ($url =~ /\/([^\/]*)$/) {
print $1;
}
On 26/04/06, Tom Phoenix <[EMAIL PROTECTED]> wrote:
>
> On 4/25/06, nishanth ev <[EMAIL PROTECTED]> wrote:
>
> > if( $url =~ /\/([\w.]*$)/ ){
> > print $1;
> > }
>
> http://example.com/some-file.txt
>
> > > To process a URL requires more than a simple pattern
> > > match. Use a
> > > module from CPAN. Cheers!
>
> What I said.
>
> --Tom Phoenix
> Stonehenge Perl Training
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> <http://learn.perl.org/> <http://learn.perl.org/first-response>
>
>
>
