system("unzip -L -P $password -n $zipfile  -d $outputdir");

    my $retcode = ($? >> 8);

    if ($retcode) {
        ## abnormal failure
        die "unzip returned abnormal exit code $retcode";
    }