===========================================================
                                      .___ __  __   
          _________________  __ __  __| _/|__|/  |_ 
         / ___\_` __ \__  \ |  |  \/ __ | | \\_  __\
        / /_/  >  | \// __ \|  |  / /_/ | |  ||  |  
        \___  /|__|  (____  /____/\____ | |__||__|  
       /_____/            \/           \/           
              grep rough audit - static analysis tool
                  v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
libzonemaster-perl-1.0.16/lib/Zonemaster/Recursor.pm-176-    elsif ( my $href = $state->{glue}{ lc( name( $ns ) ) } ) {
libzonemaster-perl-1.0.16/lib/Zonemaster/Recursor.pm:177:        foreach my $addr ( keys %$href ) {
libzonemaster-perl-1.0.16/lib/Zonemaster/Recursor.pm-178-            my $realns = ns( $ns, $addr );
##############################################
libzonemaster-perl-1.0.16/lib/Zonemaster/Recursor.pm-188-        if ( @addr > 0 ) {
libzonemaster-perl-1.0.16/lib/Zonemaster/Recursor.pm:189:            foreach my $addr ( @addr ) {
libzonemaster-perl-1.0.16/lib/Zonemaster/Recursor.pm-190-                $state->{glue}{ lc( name( $ns ) ) }{ $addr->short } = 1;
##############################################
libzonemaster-perl-1.0.16/lib/Zonemaster/Recursor.pm-212-        if ( exists $state->{glue}{ lc( name( $name ) ) } ) {
libzonemaster-perl-1.0.16/lib/Zonemaster/Recursor.pm:213:            for my $addr ( keys %{ $state->{glue}{ lc( name( $name ) ) } } ) {
libzonemaster-perl-1.0.16/lib/Zonemaster/Recursor.pm-214-                push @new, ns( $name, $addr );
##############################################
libzonemaster-perl-1.0.16/lib/Zonemaster/NSArray.pm-119-    my @addrs = Zonemaster::Recursor->get_addresses_for( $name );
libzonemaster-perl-1.0.16/lib/Zonemaster/NSArray.pm:120:    foreach my $addr ( sort { $a->ip cmp $b->ip } @addrs ) {
libzonemaster-perl-1.0.16/lib/Zonemaster/NSArray.pm-121-        my $ns = Zonemaster::Nameserver->new( { name => $name, address => $addr } );
##############################################
libzonemaster-perl-1.0.16/lib/Zonemaster/Nameserver.pm-354-    foreach my $name ( keys %object_cache ) {
libzonemaster-perl-1.0.16/lib/Zonemaster/Nameserver.pm:355:        foreach my $addr ( keys %{ $object_cache{$name} } ) {
libzonemaster-perl-1.0.16/lib/Zonemaster/Nameserver.pm-356-            say $fh "$name $addr " . $json->encode( $object_cache{$name}{$addr}->cache->data );
##############################################
libzonemaster-perl-1.0.16/inc/Module/Install/Share.pm-51-	my $postamble = '';
libzonemaster-perl-1.0.16/inc/Module/Install/Share.pm:52:	my $perm_dir = eval($ExtUtils::MakeMaker::VERSION) >= 6.52 ? '$(PERM_DIR)' : 755;
libzonemaster-perl-1.0.16/inc/Module/Install/Share.pm-53-	File::Find::find({
##############################################
libzonemaster-perl-1.0.16/inc/Module/Install/Makefile.pm-45-sub makemaker {
libzonemaster-perl-1.0.16/inc/Module/Install/Makefile.pm:46:	( @_ < 2 or $makemaker >= eval($_[1]) ) ? $makemaker : 0
libzonemaster-perl-1.0.16/inc/Module/Install/Makefile.pm-47-}
##############################################
libzonemaster-perl-1.0.16/inc/Module/Install/Fetch.pm-84-    return if exists $args{size} and -s $file != $args{size};
libzonemaster-perl-1.0.16/inc/Module/Install/Fetch.pm:85:    system($args{run}) if exists $args{run};
libzonemaster-perl-1.0.16/inc/Module/Install/Fetch.pm-86-    unlink($file) if $args{remove};
##############################################
libzonemaster-perl-1.0.16/inc/Module/Install.pm-376-# Done in evals to avoid confusing Perl::MinimumVersion
libzonemaster-perl-1.0.16/inc/Module/Install.pm:377:eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@;
libzonemaster-perl-1.0.16/inc/Module/Install.pm-378-sub _read {
##############################################
libzonemaster-perl-1.0.16/inc/Module/Install.pm-416-# Done in evals to avoid confusing Perl::MinimumVersion
libzonemaster-perl-1.0.16/inc/Module/Install.pm:417:eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@;
libzonemaster-perl-1.0.16/inc/Module/Install.pm-418-sub _write {
##############################################
libzonemaster-perl-1.0.16/.pc/0002-fix-spelling-errors.patch/lib/Zonemaster/Nameserver.pm-354-    foreach my $name ( keys %object_cache ) {
libzonemaster-perl-1.0.16/.pc/0002-fix-spelling-errors.patch/lib/Zonemaster/Nameserver.pm:355:        foreach my $addr ( keys %{ $object_cache{$name} } ) {
libzonemaster-perl-1.0.16/.pc/0002-fix-spelling-errors.patch/lib/Zonemaster/Nameserver.pm-356-            say $fh "$name $addr " . $json->encode( $object_cache{$name}{$addr}->cache->data );