0x1af4
3ˆ
ƒ„Ë¿Ì Ä 3
Index of /configAHR/Jump/0-coastlinecompg/FSS-OZR/root/proc/self/cwd/usr/share/doc/perl-threads
Index of /configAHR/Jump/0-coastlinecompg/FSS-OZR/root/proc/self/cwd/usr/share/doc/perl-threads
5ˆ
ƒ Œ½Ë¿Ì f 5
Index of /anon_sym/anon/sys/dev/char/13:34/subsystem/event0
Index of /anon_sym/anon/sys/dev/char/13:34/subsystem/event0
# 7ˆl–Ðz¾”êe¶¥8 ¸Èn•1hßÐ
„m÷ÜÀÍ ?÷ 7#!/usr/bin/perl
# zipdetails
#
# Display info on the contents of a Zip file
#
BEGIN { pop @INC if $INC[-1] eq '.' }
use strict;
use warnings ;
use IO::File;
use Encode;
use Getopt::Long;
# Compression types
use constant ZIP_CM_STORE => 0 ;
use constant ZIP_CM_IMPLODE => 6 ;
use constant ZIP_CM_DEFLATE => 8 ;
use constant ZIP_CM_BZIP2 => 12 ;
use constant ZIP_CM_LZMA => 14 ;
use constant ZIP_CM_PPMD => 98 ;
# General Purpose Flag
use constant ZIP_GP_FLAG_ENCRYPTED_MASK => (1 << 0) ;
use constant ZIP_GP_FLAG_STREAMING_MASK => (1 << 3) ;
use constant ZIP_GP_FLAG_PATCHED_MASK => (1 << 5) ;
use constant ZIP_GP_FLAG_STRONG_ENCRYPTED_MASK => (1 << 6) ;
use constant ZIP_GP_FLAG_LZMA_EOS_PRESENT => (1 << 1) ;
use constant ZIP_GP_FLAG_LANGUAGE_ENCODING => (1 << 11) ;
# Internal File Attributes
use constant ZIP_IFA_TEXT_MASK => 1;
# Signatures for each of the headers
use constant ZIP_LOCAL_HDR_SIG => 0x04034b50;
use constant