On 09/14/2006 09:20 AM, Derek B. Smith wrote:
[...]
sub zipit {
##-- Add all readable files below $oldir --##
##-- and write them into a file. --##
my $zip = Archive::Zip->new();
my $entry = $zip->addDirectory ("$oldir/$word/")
or die "Failed to add file for archive zip $!";
$entry->de
--- Tom Phoenix <[EMAIL PROTECTED]> wrote:
> On 9/14/06, Derek B. Smith
> <[EMAIL PROTECTED]> wrote:
>
> > my %subdir_for = (
> > 'bpjava\-msvc' => 23,
> > 'bpjava\-susvc' => 24,
> > 'bpjava\-usvc'=> 25,
> > )
>
> Those backslashes aren't doing anything. But they
> aren't needed,
> e
On 9/14/06, Derek B. Smith <[EMAIL PROTECTED]> wrote:
my %subdir_for = (
'bpjava\-msvc' => 23,
'bpjava\-susvc' => 24,
'bpjava\-usvc'=> 25,
)
Those backslashes aren't doing anything. But they aren't needed,
either; hyphen isn't a special character in a hash key or
single-quoted stri