| Subject: | Multiple symlinks not stored correctly |
If two symlinks point to the same physical file, then only one symlink is
created by Archive::Tar. See the attached file for a test case.
Regards,
Slaven
use Archive::Tar;
unlink $_ for qw(a1 l1 l2);
system("echo bla > a1");
symlink "a1", $_ for qw(l1 l2);
my $tar = Archive::Tar->new;
$tar->add_files(qw(a1 l1 l2));
$tar->write("/tmp/foo.tar");
# compare result with that of:
# tar cf foo.tar a1 l1 l2