If you are checking errors every time you addFile() and again when you writeToFileNamed, the zip file created should be good.

There is one more thing that you can do to test it (besides extracting the files), and that is to read the zip file.
die "Invalid zip file!" if $zip->read($bfiledst) != AZ_OK;