Re: reverse chop/string chop ?

You can do this without reverse or chop, with a one-liner:

my $URL = "http://www.mysite.com/images/uploads/1050084447_4.jpg";

# retrieves the image name from the URL
my $image_name = (split /\//, $URL)[-1];

print "$image_name\n";
[download]

Which prints:

1050084447_4.jpg
[download]

Comment on Re: reverse chop/string chop ? Select or Download Code

Replies are listed 'Best First'.
Re: Re: reverse chop/string chop ? by sauoq (Abbot) on Oct 22, 2003 at 06:44 UTC
There's no reason to use `split` either... `my ($file) = $url =~ m!([^/]*)$!;` [download] -sauoq "My two cents aren't worth a dime.";	[reply] [d/l]
Re: Re: reverse chop/string chop ? by th3monk3y (Novice) on Oct 22, 2003 at 04:04 UTC
works like a charm! thanks guys!	[reply]

In Section Seekers of Perl Wisdom