http://www.perlmonks.org?node_id=997837


in reply to Check a zipfile for password

related: Determine if a file is password protected

edit: see §7 of the spec.

edit2: using Archive::Zip, try to extract and catch the exception error: encryption unsupported.