=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libarchive-zip-perl-1.68/t/README.md-31- libarchive-zip-perl-1.68/t/README.md:32:- Use `BEGIN { $^W = 1; }` in the test headers instead of the libarchive-zip-perl-1.68/t/README.md-33- usually preferred `use warnings;` since that way the ############################################## libarchive-zip-perl-1.68/t/README.md-84- libarchive-zip-perl-1.68/t/README.md:85:- `passThrough( $fromFile, $toFile, $action );` libarchive-zip-perl-1.68/t/README.md-86- libarchive-zip-perl-1.68/t/README.md:87: Reads archive `$fromFile`, executes `$action` on every member libarchive-zip-perl-1.68/t/README.md:88: (or does nothing if `$action` is false), writes the resulting libarchive-zip-perl-1.68/t/README.md:89: archive to `$toFile`. libarchive-zip-perl-1.68/t/README.md-90- libarchive-zip-perl-1.68/t/README.md:91:- `my $data = readFile( $file );` libarchive-zip-perl-1.68/t/README.md-92- ############################################## libarchive-zip-perl-1.68/t/README.md-94- libarchive-zip-perl-1.68/t/README.md:95:- `my ( $outErr, $exitVal ) = execProc( $command );` libarchive-zip-perl-1.68/t/README.md-96- ############################################## libarchive-zip-perl-1.68/t/README.md-101- libarchive-zip-perl-1.68/t/README.md:102:- `my ( $outErr, $exitVal ) = execPerl( @args );` libarchive-zip-perl-1.68/t/README.md-103- ############################################## libarchive-zip-perl-1.68/t/README.md-106- libarchive-zip-perl-1.68/t/README.md:107:- `my $file = dataPath( "simple" );` libarchive-zip-perl-1.68/t/README.md:108: `my $file = dataPath( "simple.zip" );` libarchive-zip-perl-1.68/t/README.md:109: `my $file = dataPath( "t/data/simple.zip" );` libarchive-zip-perl-1.68/t/README.md-110- ############################################## libarchive-zip-perl-1.68/t/README.md-114- libarchive-zip-perl-1.68/t/README.md:115: `my $file = dataPath( "simple.zip", PATH_REL );` libarchive-zip-perl-1.68/t/README.md-116- ############################################## libarchive-zip-perl-1.68/t/README.md-119- libarchive-zip-perl-1.68/t/README.md:120: `my $file = dataPath( "simple.zip", PATH_ABS );` libarchive-zip-perl-1.68/t/README.md-121- ############################################## libarchive-zip-perl-1.68/t/README.md-123- libarchive-zip-perl-1.68/t/README.md:124: `my $file = dataPath( "simple.zip", PATH_ZIPFILE );` libarchive-zip-perl-1.68/t/README.md-125- ############################################## libarchive-zip-perl-1.68/t/README.md-129- libarchive-zip-perl-1.68/t/README.md:130: `my $file = dataPath( "simple.zip", PATH_ZIPDIR );` libarchive-zip-perl-1.68/t/README.md-131- ############################################## libarchive-zip-perl-1.68/t/README.md-134- libarchive-zip-perl-1.68/t/README.md:135: `my $file = dataPath( "simple.zip", PATH_ZIPABS );` libarchive-zip-perl-1.68/t/README.md-136- ############################################## libarchive-zip-perl-1.68/t/README.md-139- libarchive-zip-perl-1.68/t/README.md:140:- `my $file = testPath( @pathItems, $pathType );` libarchive-zip-perl-1.68/t/README.md-141- ############################################## libarchive-zip-perl-1.68/t/README.md-156-Note that some of the test functions rely on a particular libarchive-zip-perl-1.68/t/README.md:157:`$Archive::Zip::Errorhandler` being in place, so avoid using your libarchive-zip-perl-1.68/t/README.md-158-own handler unless you know what you are doing. ############################################## libarchive-zip-perl-1.68/t/README.md-161- libarchive-zip-perl-1.68/t/README.md:162:- `azbinis( $got, $expected, $name );` libarchive-zip-perl-1.68/t/README.md-163- ############################################## libarchive-zip-perl-1.68/t/README.md-165- provides additional diagnostics when comparison of lengthy libarchive-zip-perl-1.68/t/README.md:166: binary `$got` and `$expected` fails. Does not return any libarchive-zip-perl-1.68/t/README.md-167- meaningful value. libarchive-zip-perl-1.68/t/README.md-168- libarchive-zip-perl-1.68/t/README.md:169:- `my $ok = azok( $status, $name );` libarchive-zip-perl-1.68/t/README.md-170- libarchive-zip-perl-1.68/t/README.md:171: Test that succeeds if `$status` equals `AZ_OK` and fails libarchive-zip-perl-1.68/t/README.md-172- otherwise. Provides built-in diagnostics in case of test ############################################## libarchive-zip-perl-1.68/t/README.md-174- libarchive-zip-perl-1.68/t/README.md:175:- `my $ok = azis( $status, $expectedStatus, $name );` libarchive-zip-perl-1.68/t/README.md:176: `my $ok = azis( $status, qr/$errorMatchingRegexp/, $name );` libarchive-zip-perl-1.68/t/README.md:177: `my $ok = azis( $status, $expectedStatus, qr/$errorMatchingRegexp/, $name );` libarchive-zip-perl-1.68/t/README.md-178- ############################################## libarchive-zip-perl-1.68/t/README.md-184- libarchive-zip-perl-1.68/t/README.md:185:- `my $fileHandle = azopen( $file )` libarchive-zip-perl-1.68/t/README.md-186- ############################################## libarchive-zip-perl-1.68/t/README.md-222- libarchive-zip-perl-1.68/t/README.md:223: The expected patterns `$xppats` must be specified as a list libarchive-zip-perl-1.68/t/README.md:224: of triples `[$exitVal, $outerrRegexp, $osName]`, like this: libarchive-zip-perl-1.68/t/README.md-225- ############################################## libarchive-zip-perl-1.68/t/README.md-237- libarchive-zip-perl-1.68/t/README.md:238:- `azwok( $zip, %params )` libarchive-zip-perl-1.68/t/README.md-239- ############################################## libarchive-zip-perl-1.68/t/common.pm-97- # operating systems libarchive-zip-perl-1.68/t/common.pm:98: return (scalar(`$_[0] 2>&1`), $?); libarchive-zip-perl-1.68/t/common.pm-99-} ############################################## libarchive-zip-perl-1.68/lib/Archive/Zip/ZipFileMember.pm-57- libarchive-zip-perl-1.68/lib/Archive/Zip/ZipFileMember.pm:58: $where = $self->localHeaderRelativeOffset() unless defined($where); libarchive-zip-perl-1.68/lib/Archive/Zip/ZipFileMember.pm-59- ############################################## libarchive-zip-perl-1.68/lib/Archive/Zip/ZipFileMember.pm-61- return _formatError("corrupt zip file") libarchive-zip-perl-1.68/lib/Archive/Zip/ZipFileMember.pm:62: if defined($previousWhere) && $where == $previousWhere; libarchive-zip-perl-1.68/lib/Archive/Zip/ZipFileMember.pm-63-