Re: Extracting Page Name

You can use a regular expression. It matches non-slash characters up to the end of the URL.

my ($pagename) = $url =~ m{([^/]+)$};
[download]

Comment on Re: Extracting Page Name Download Code

Replies are listed 'Best First'.
Re^2: Extracting Page Name by ww (Archbishop) on Apr 27, 2012 at 13:54 UTC
... but has a (greedy) failure mode: `C:\>perl -e "my $url = 'http://www.perlmonks.com/index.pl?node_id=9674 +84'; my ($pagename) = $url =~ m{([^/]+)$}; print $pagename;" index.pl?node_id=967484 C:\>` [download]	[reply] [d/l]
Re^2: Extracting Page Name by JimStone (Initiate) on Apr 27, 2012 at 00:07 UTC
Thanks everyone for the quick replies. This regular expression is just what I needed to see what I was doing wrong.	[reply]