Help for this page

Select Code to Download

Select or download this

find( sub {
    return unless -e $File::Find::name;
...
            or warn "Cannot add '$_' to zip file: $SimpleZipError\n";
    1 } or warn $@||'unknown error';
}, $data);