=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== liblib-abs-perl-0.95/inc/Module/Install/Fetch.pm-84- return if exists $args{size} and -s $file != $args{size}; liblib-abs-perl-0.95/inc/Module/Install/Fetch.pm:85: system($args{run}) if exists $args{run}; liblib-abs-perl-0.95/inc/Module/Install/Fetch.pm-86- unlink($file) if $args{remove}; ############################################## liblib-abs-perl-0.95/inc/Module/Install/Makefile.pm-45-sub makemaker { liblib-abs-perl-0.95/inc/Module/Install/Makefile.pm:46: ( @_ < 2 or $makemaker >= eval($_[1]) ) ? $makemaker : 0 liblib-abs-perl-0.95/inc/Module/Install/Makefile.pm-47-} ############################################## liblib-abs-perl-0.95/t/check.pl-34-lib::abs->import( '.' ); liblib-abs-perl-0.95/t/check.pl:35:diag "Bin = `$FindBin::Bin' ;. is `$INC[0]'"; liblib-abs-perl-0.95/t/check.pl-36-is( $FindBin::Bin, $INC[0], '. => $FindBin::Bin' ); ############################################## liblib-abs-perl-0.95/t/lib/3.26/Cwd.pm-325- liblib-abs-perl-0.95/t/lib/3.26/Cwd.pm:326: my $cwd = `$pwd_cmd`; liblib-abs-perl-0.95/t/lib/3.26/Cwd.pm-327- # Belt-and-suspenders in case someone said "undef $/". ############################################## liblib-abs-perl-0.95/t/lib/3.29/Cwd.pm-327- liblib-abs-perl-0.95/t/lib/3.29/Cwd.pm:328: my $cwd = `$pwd_cmd`; liblib-abs-perl-0.95/t/lib/3.29/Cwd.pm-329- # Belt-and-suspenders in case someone said "undef $/". ############################################## liblib-abs-perl-0.95/t/lib/3.27/Cwd.pm-325- liblib-abs-perl-0.95/t/lib/3.27/Cwd.pm:326: my $cwd = `$pwd_cmd`; liblib-abs-perl-0.95/t/lib/3.27/Cwd.pm-327- # Belt-and-suspenders in case someone said "undef $/". ############################################## liblib-abs-perl-0.95/t/lib/3.12/Cwd.pm-323- liblib-abs-perl-0.95/t/lib/3.12/Cwd.pm:324: my $cwd = `$pwd_cmd`; liblib-abs-perl-0.95/t/lib/3.12/Cwd.pm-325- # Belt-and-suspenders in case someone said "undef $/". ############################################## liblib-abs-perl-0.95/t/lib/3.2501/Cwd.pm-325- liblib-abs-perl-0.95/t/lib/3.2501/Cwd.pm:326: my $cwd = `$pwd_cmd`; liblib-abs-perl-0.95/t/lib/3.2501/Cwd.pm-327- # Belt-and-suspenders in case someone said "undef $/". ############################################## liblib-abs-perl-0.95/lib/lib/abs.pm-134- my $abs = mkapath(1) . $_; liblib-abs-perl-0.95/lib/lib/abs.pm:135: my $ret = abs_path( $abs ) or _carp("Bad path specification: `$_' => `$abs'" . ($! ? " ($!)" : '')); liblib-abs-perl-0.95/lib/lib/abs.pm-136- _debug "$_ => $ret" if DEBUG > 1; ############################################## liblib-abs-perl-0.95/lib/lib/abs.pm-153- $x = abs_path( $_ ) and -d $x liblib-abs-perl-0.95/lib/lib/abs.pm:154: or $SOFT or _croak("Bad path specification: `$lib' => `$x'" . ($! ? " ($!)" : '')); liblib-abs-perl-0.95/lib/lib/abs.pm-155- defined $x ? ($x) : (); ############################################## liblib-abs-perl-0.95/lib/lib/abs.pm-160- 1} and -d $_ liblib-abs-perl-0.95/lib/lib/abs.pm:161: or $SOFT or _croak("Bad path specification: `$lib' => `$abs'" . ($! ? " ($!)" : '')); liblib-abs-perl-0.95/lib/lib/abs.pm-162- _debug "$lib => $_" if DEBUG > 1;