=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libfile-finder-perl-0.53/lib/File/Finder/Steps.pm-546- my $big = File::Finder->size("+100"); libfile-finder-perl-0.53/lib/File/Finder/Steps.pm:547: my $old_or_big = File::Finder->eval($old)->or->eval($big); libfile-finder-perl-0.53/lib/File/Finder/Steps.pm-548- my $killer = File::Finder->eval(sub { unlink }); libfile-finder-perl-0.53/lib/File/Finder/Steps.pm:549: my $kill_old_or_big = File::Finder->eval($old_or_big)->ls->eval($killer); libfile-finder-perl-0.53/lib/File/Finder/Steps.pm-550- $kill_old_or_big->in('/tmp'); ############################################## libfile-finder-perl-0.53/lib/File/Finder.pm-51- my @result; libfile-finder-perl-0.53/lib/File/Finder.pm:52: my $self_store = $self->eval( sub { push @result, $code->() } ); libfile-finder-perl-0.53/lib/File/Finder.pm-53- ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-9- my $r; libfile-finder-perl-0.53/t/02-basic-logic.t:10: $f->eval(sub {$r += 2})->as_wanted->(); libfile-finder-perl-0.53/t/02-basic-logic.t-11- is($r, 2, 'core eval'); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-16- $f libfile-finder-perl-0.53/t/02-basic-logic.t:17: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-18- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-24- $f->eval(sub { 0 }) libfile-finder-perl-0.53/t/02-basic-logic.t:25: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-26- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-32- $f->or libfile-finder-perl-0.53/t/02-basic-logic.t:33: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-34- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-40- $f->true libfile-finder-perl-0.53/t/02-basic-logic.t:41: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-42- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-48- $f->false libfile-finder-perl-0.53/t/02-basic-logic.t:49: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-50- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-56- $f->not->true libfile-finder-perl-0.53/t/02-basic-logic.t:57: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-58- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-64- $f->not->false libfile-finder-perl-0.53/t/02-basic-logic.t:65: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-66- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-72- $f->not->not->true libfile-finder-perl-0.53/t/02-basic-logic.t:73: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-74- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-80- $f->not->not->false libfile-finder-perl-0.53/t/02-basic-logic.t:81: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-82- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-88- $f->or libfile-finder-perl-0.53/t/02-basic-logic.t:89: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-90- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-96- $f->false->or libfile-finder-perl-0.53/t/02-basic-logic.t:97: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-98- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-104- $f->or->or libfile-finder-perl-0.53/t/02-basic-logic.t:105: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-106- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-113- ->left->right libfile-finder-perl-0.53/t/02-basic-logic.t:114: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-115- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-122- ->left->right libfile-finder-perl-0.53/t/02-basic-logic.t:123: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-124- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-131- ->left->right libfile-finder-perl-0.53/t/02-basic-logic.t:132: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-133- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-140- ->left libfile-finder-perl-0.53/t/02-basic-logic.t:141: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-142- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-150- ->left libfile-finder-perl-0.53/t/02-basic-logic.t:151: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-152- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-160- ->left libfile-finder-perl-0.53/t/02-basic-logic.t:161: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-162- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-170- ->left->true->right libfile-finder-perl-0.53/t/02-basic-logic.t:171: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-172- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-179- ->left->false->right libfile-finder-perl-0.53/t/02-basic-logic.t:180: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-181- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-188- ->left->or->right libfile-finder-perl-0.53/t/02-basic-logic.t:189: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-190- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-197- ->left->true->right libfile-finder-perl-0.53/t/02-basic-logic.t:198: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-199- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-206- ->left->false->right libfile-finder-perl-0.53/t/02-basic-logic.t:207: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-208- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-215- ->left->or->right libfile-finder-perl-0.53/t/02-basic-logic.t:216: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-217- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-224- ->left->true->right libfile-finder-perl-0.53/t/02-basic-logic.t:225: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-226- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-233- ->left->false->right libfile-finder-perl-0.53/t/02-basic-logic.t:234: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-235- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-242- ->left->or->right libfile-finder-perl-0.53/t/02-basic-logic.t:243: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-244- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-251- ->left->true->right libfile-finder-perl-0.53/t/02-basic-logic.t:252: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-253- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-260- ->left->false->right libfile-finder-perl-0.53/t/02-basic-logic.t:261: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-262- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-269- ->left->or->right libfile-finder-perl-0.53/t/02-basic-logic.t:270: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-271- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-277- $f->comma libfile-finder-perl-0.53/t/02-basic-logic.t:278: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-279- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-286- ->comma libfile-finder-perl-0.53/t/02-basic-logic.t:287: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-288- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-295- ->comma libfile-finder-perl-0.53/t/02-basic-logic.t:296: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-297- ->as_wanted->(); ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-305- ->comma libfile-finder-perl-0.53/t/02-basic-logic.t:306: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-307- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-316- ->comma libfile-finder-perl-0.53/t/02-basic-logic.t:317: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-318- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-327- ->comma libfile-finder-perl-0.53/t/02-basic-logic.t:328: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-329- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-338- ->false->comma libfile-finder-perl-0.53/t/02-basic-logic.t:339: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-340- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-349- ->false->comma libfile-finder-perl-0.53/t/02-basic-logic.t:350: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-351- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-360- ->false->comma libfile-finder-perl-0.53/t/02-basic-logic.t:361: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-362- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-371- ->or->comma libfile-finder-perl-0.53/t/02-basic-logic.t:372: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-373- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-382- ->or->comma libfile-finder-perl-0.53/t/02-basic-logic.t:383: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-384- ->right ############################################## libfile-finder-perl-0.53/t/02-basic-logic.t-393- ->or->comma libfile-finder-perl-0.53/t/02-basic-logic.t:394: ->eval(sub {$r += 2})->or->eval(sub {$r += 1}) libfile-finder-perl-0.53/t/02-basic-logic.t-395- ->right ############################################## libfile-finder-perl-0.53/t/04-ffr.t-17- my $r; libfile-finder-perl-0.53/t/04-ffr.t:18: isa_ok(my $ffr = File::Find::Rule->exec(sub { $r = 1 }), "File::Find::Rule"); libfile-finder-perl-0.53/t/04-ffr.t-19- isa_ok(my $combined = $f->ffr($ffr), "File::Finder"); ############################################## libfile-finder-perl-0.53/t/04-ffr.t-35- local $File::Find::dir = "/DUM"; libfile-finder-perl-0.53/t/04-ffr.t:36: $combined->eval(sub { $r = 1 })->as_wanted->(); libfile-finder-perl-0.53/t/04-ffr.t-37- is($r, 1, "simple ffr rule returned true"); ############################################## libfile-finder-perl-0.53/t/04-ffr.t-47- local $File::Find::dir = "/DUM"; libfile-finder-perl-0.53/t/04-ffr.t:48: $combined->eval(sub { $r = 1 })->as_wanted->(); libfile-finder-perl-0.53/t/04-ffr.t-49- is($r, undef, "simple ffr rule returned false");