Skip Menu |
 

This queue is for tickets about the Path-Ancestor CPAN distribution.

Report information
The Basics
Id: 122341
Status: new
Priority: 0/
Queue: Path-Ancestor

People
Owner: Nobody in particular
Requestors: jan.bottek [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: Path Ancestor match a false Ancestor with the following example
Date: Mon, 3 Jul 2017 20:17:36 +0200
To: bug-Path-Ancestor [...] rt.cpan.org
From: Jan Bottek <jan.bottek [...] gmail.com>
Download (untitled) / with headers
text/plain 836b
Hi Mike Schilli, with the following example, the great Path::Ancestor module will match a wrong Ancestor path ----------------------------------------------------------- use strict; use warnings; use Path::Ancestor qw(longest_common_ancestor); my @pathes = ("/foo/bar/baz", "/foo/bar/baz/moo", "/foo/bar1/qasa" ); # possible solution my $ancestor = longest_common_ancestor( @pathes ); print "Wrong: $ancestor"; print "\n"; @pathes = reverse sort @pathes; $ancestor = longest_common_ancestor( @pathes ); print "with Ancestor patch: $ancestor"; ----------------------------------------------------------- Stupid patch from my site was to reverse/sort the entry pathes. What do you think about it? Thx in Advance. Kind regards. Jan Bottek


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.