Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

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

my $stat = $zipFile->overwrite();
  2. or download this
    Can't call method "_writeToFileHandle" without a package or object ref
+erence at /usr/local/share/perl/5.8.8/Archive/Zip/Archive.pm line 280