my $shortname = $bfile;
$shortname =~ s!.*[\\/]!!;
my $member = $zip->addFile($bfile, $shortname);