Yet Another CPAN Grep

Imager ( T/TO/TONYC/Imager-1.028.tar.gz, TONYC, 2025; MetaCPAN )

Imager/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

App-BS ( C/CR/CRABAPP/App-BS-0.tar.gz, CRABAPP, 2025; MetaCPAN )

App-BS/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Archive-Tar-Builder ( X/XA/XAN/Archive-Tar-Builder-2.5006.tar.gz, XAN, 2025; MetaCPAN )

Archive-Tar-Builder/src/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Thread-CSP ( L/LE/LEONT/Thread-CSP-0.015.tar.gz, LEONT, 2025; MetaCPAN )

Thread-CSP/src/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

OpenGL-GLFW ( E/ET/ETJ/OpenGL-GLFW-0.0403.tar.gz, ETJ, 2025; MetaCPAN )

OpenGL-GLFW/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Devel-Size ( N/NW/NWCLARK/Devel-Size-0.85.tar.gz, NWCLARK, 2025; MetaCPAN )

Devel-Size/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Image-PNG-QRCode ( B/BK/BKB/Image-PNG-QRCode-0.11.tar.gz, BKB, 2025; MetaCPAN )

Image-PNG-QRCode/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Archive-Unzip-Burst ( S/SM/SMUELLER/Archive-Unzip-Burst-0.03.tar.gz, SMUELLER, 2025; MetaCPAN )

Archive-Unzip-Burst/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # temporarily remove C comment

OpenGL-Modern ( E/ET/ETJ/OpenGL-Modern-0.0401.tar.gz, ETJ, 2025; MetaCPAN )

OpenGL-Modern/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Protocol-Redis-XS ( D/DB/DBOOK/Protocol-Redis-XS-0.10.tar.gz, DBOOK, 2025; MetaCPAN )

Protocol-Redis-XS/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Clone ( A/AT/ATOOMIC/Clone-0.48_01.tar.gz, ATOOMIC, 2025; MetaCPAN )

Clone/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

YAML-LibYAML ( T/TI/TINITA/YAML-LibYAML-v0.904.0.tar.gz, TINITA, 2025; MetaCPAN )

YAML-LibYAML/LibYAML/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

POSIX-RT-Signal ( L/LE/LEONT/POSIX-RT-Signal-0.019.tar.gz, LEONT, 2025; MetaCPAN )

POSIX-RT-Signal/lib/POSIX/RT/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Gzip-Libdeflate ( B/BK/BKB/Gzip-Libdeflate-0.11.tar.gz, BKB, 2025; MetaCPAN )

Gzip-Libdeflate/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Unicode-Precis-Preparation ( N/NE/NEZUMI/Unicode-Precis-Preparation-2025.004.tar.gz, NEZUMI, 2025; MetaCPAN )

Unicode-Precis-Preparation/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

JQ-Lite ( S/SH/SHINGO/JQ-Lite-0.42.tar.gz, SHINGO, 2025; MetaCPAN )

JQ-Lite/script/jq.pl ( view source; MetaCPAN )

/../lib";
use JQ::Lite;

my $query = shift or die "Usage: $0 '.query'\n";
my $json_text = do { local $/; <STDIN> };

my $jq = JQ::Lite->new;
my @results = $jq->run_query($json_text, $query);

my $pp =

HiPi ( M/MD/MDOOTSON/HiPi-0.93.tar.gz, MDOOTSON, 2025; MetaCPAN )

HiPi/mylib/include/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Socket-More ( D/DR/DRCLAW/Socket-More-v0.5.2.tar.gz, DRCLAW, 2025; MetaCPAN )

Socket-More/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm

Code-TidyAll ( D/DR/DROLSKY/Code-TidyAll-0.85.tar.gz, DROLSKY, 2025; MetaCPAN )

Code-TidyAll/lib/Code/TidyAll/Git/Prereceive.pm ( view source; MetaCPAN )

      my $root_dir = cwd();
        local $ENV{GIT_DIR} = $root_dir;

        my $input = do { local $/; <STDIN> };
        $fail_msg = $self->check_input($input);
    }
    catch {
        my $error

  use warnings;

    Code::TidyAll::Git::Prereceive->check();


    # or

    my $input = do { local $/; <STDIN> };

    # Do other things with $input here

    my $hook = Code::TidyAll::Git::Prerecei

Syntax-Infix-Smartmatch ( L/LE/LEONT/Syntax-Infix-Smartmatch-0.011.tar.gz, LEONT, 2025; MetaCPAN )

Syntax-Infix-Smartmatch/ppport.h ( view source; MetaCPAN )

o read from $filename: $!\n";
    next;
  }

  info("Scanning $filename ...");

  my $c = do { local $/; <IN> };
  close IN;

  my %file = (orig => $c, changes => 0);

  # Temporarily remove C/XS comm