Select Code to Download

#!/usr/bin/perl

...
my $oldmember = $zipFile->updateMember( $oldimage1, $newimage1 );

my $stat = $zipFile->overwrite();

#!/usr/bin/perl

...
my $newmember = $zipFile->addFile( $newimage1, "branch/stick/$newimage
+1");

my $stat = $zipFile->overwrite();