Thank you John Anderson and others. I see your answers in the archives, but for some reason I am not receiving the list postings anymore. I am working to correct that.
It appears the last time I received a post was 3/17/2018. Mike On 3/17/2018 10:02 AM, Mike Flannigan wrote:
This line works fine: if ($link =~ m#/([^/]*)$#) { But this one in its place does not work: if ($link =~ m/\/([^/]*)$/) { # Oddly this does not work Gives error:Unmatched [ in regex; marked by <-- HERE in m//([ <-- HERE ^/ at csvtopo24.pl line 74.I think it has to do with the "[^/]*". Anybody have an explanation for this? Mike Simplified code: #!/usr/bin/perl use strict; use warnings; my $link = '/tree'; #if ($link =~ m/\/([^/]*)$/) { # Oddly this does not work if ($link =~ m#/([^/]*)$#) { my $match = $1; print "\nIt worked - $match.\n\n"; } __END__
-- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected] http://learn.perl.org/
