Yet Another CPAN Grep

PathTools ( X/XS/XSAWYERX/PathTools-3.75.tar.gz, XSAWYERX, 2018; MetaCPAN )

PathTools/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

JavaScript-Duktape ( M/MA/MAMOD/JavaScript-Duktape-2.5.0.tar.gz, MAMOD, 2018; MetaCPAN )

JavaScript-Duktape/lib/JavaScript/Duktape/C/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

Device-BCM2835 ( M/MI/MIKEM/Device-BCM2835-1.94.tar.gz, MIKEM, 2018; MetaCPAN )

Device-BCM2835/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

Math-Geometry-Delaunay ( S/SH/SHELDRAKE/Math-Geometry-Delaunay-0.21.tar.gz, SHELDRAKE, 2018; MetaCPAN )

Math-Geometry-Delaunay/src_Win64/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

threads ( R/RU/RURBAN/threads-2.22_01.tar.gz, RURBAN, 2018; MetaCPAN )

threads/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

Math-Geometry-Delaunay ( S/SH/SHELDRAKE/Math-Geometry-Delaunay-0.21.tar.gz, SHELDRAKE, 2018; MetaCPAN )

Math-Geometry-Delaunay/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

Footprintless ( L/LT/LTHEISEN/Footprintless-1.29.tar.gz, LTHEISEN, 2018; MetaCPAN )

Footprintless/lib/Footprintless/Util.pm ( view source; MetaCPAN )

21/slurp.html
    return $file
        ? do { local ( @ARGV, $/ ) = $file; <> }
        : do { local $/; <STDIN> };
}

sub spurt {
    my ( $content, $file, %options ) = @_;
    my $write_mode = $opti

Algorithm-Heapify-XS ( Y/YV/YVES/Algorithm-Heapify-XS-0.04.tar.gz, YVES, 2018; MetaCPAN )

Algorithm-Heapify-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

SkewHeap ( J/JE/JEFFOBER/SkewHeap-0.05.tar.gz, JEFFOBER, 2018; MetaCPAN )

SkewHeap/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

Regexp-Util ( T/TO/TOBYINK/Regexp-Util-0.005.tar.gz, TOBYINK, 2018; MetaCPAN )

Regexp-Util/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

TestML1 ( I/IN/INGY/TestML1-0.57.tar.gz, INGY, 2018; MetaCPAN )

TestML1/lib/TestML1/Library/Standard.pm ( view source; MetaCPAN )

    open FILE, $file or die "Can't open $file for input in " . Cwd::cwd;
#     my $text = do { local $/; <FILE> };
#     close FILE;
#     return str($text);
# }

# sub Pass {
#     my ($self, @args)

Devel-Callsite ( R/RO/ROCKY/Devel-Callsite-1.0.1.tar.gz, ROCKY, 2018; MetaCPAN )

Devel-Callsite/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

Digest-Skein ( E/ER/ERWANMAS/Digest-Skein-0.10.zip, ERWANMAS, 2018; MetaCPAN )

Digest-Skein/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

Audio-Scan ( A/AG/AGRUNDMA/Audio-Scan-1.01.tar.gz, AGRUNDMA, 2018; MetaCPAN )

Audio-Scan/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 comment

Digest-HighwayHash ( M/MG/MGV/Digest-HighwayHash-0.002.tar.gz, MGV, 2018; MetaCPAN )

Digest-HighwayHash/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

Unix-Statgrab ( R/RE/REHSACK/Unix-Statgrab-0.112.tar.gz, REHSACK, 2018; MetaCPAN )

Unix-Statgrab/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

Set-IntervalTree ( S/SL/SLOYD/Set-IntervalTree-0.12.tar.gz, SLOYD, 2018; MetaCPAN )

Set-IntervalTree/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

Sort-Naturally-XS ( S/SE/SERVAL/Sort-Naturally-XS-0.7.9.tar.gz, SERVAL, 2018; MetaCPAN )

Sort-Naturally-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

List-SomeUtils-XS ( D/DR/DROLSKY/List-SomeUtils-XS-0.58.tar.gz, DROLSKY, 2018; MetaCPAN )

List-SomeUtils-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

Lingua-RU-Money-XS ( I/IM/IMUN/Lingua-RU-Money-XS-0.08.tar.gz, IMUN, 2018; MetaCPAN )

Lingua-RU-Money-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