Hi Malcolm, Malcolm Nooning schrieb:
The -c seems to be broken, but the error message is misleading. In the final analysis, Zip.pm is being handed a $name string with "C:/perl/site/lib/sitecustomize.pl" errantly tacked onto the end of it, for sub extractMember in Zip.pm, as I think I will show. I do not know where pp is doing it. I will take a guess here that if we can find out what is tacking C:/perl/site/lib/sitecustomize.pl onto the said $name string and simply remove it, the problem might be solved. At least, it is something that can be looked at.
I can't reproduce this problem, so I can't debug it. However, perhaps I can give you a few suggestions:
Do you know *where* the bad string is passed to Archive::Zip? That would help tremendously with debugging this. You specifically talk about a variable $name. I'll take that you're looking at a specific piece of code. Supposing $name is in Archive::Zip (say, in new() or so), then you can find out where it's coming from by adding these two lines to the corresponding method:
use Carp qw/cluck/; cluck($name) if $name =~ /C:\/perl\/site/; # or similar and look at the stack trace(s) that are printed. Good luck! Steffen
