Hello, I tried this and worked. Please let me know in case you find any bugs in this :)
$url="http://dev.catalyst.perl.org/wiki/YetAnotherCatalystIntro";; if( $url =~ /\/([\w.]*$)/ ){ print $1; } else{ print "No Match"; } Regards Nishanth --- Tom Phoenix <[EMAIL PROTECTED]> wrote: > On 4/25/06, John Ackley <[EMAIL PROTECTED]> wrote: > > > if( $url =~ /\/(.*$)/ ) > > > > then characters after last / are found in $1 > > Unfortunately, characters after the first slash are > in there, too. > > To process a URL requires more than a simple pattern > match. Use a > module from CPAN. Cheers! > > --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> > > > __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
