Yet Another CPAN Grep

Config-UCL ( B/BO/BOKUTIN/Config-UCL-0.05.tar.gz, BOKUTIN, 2020; MetaCPAN )

Config-UCL/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

Shout ( N/NI/NIKOLAS/Shout-2.1.4.tar.gz, NIKOLAS, 2020; MetaCPAN )

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

Alt-Syntax-Kamelon-RT129134 ( C/CX/CXW/Alt-Syntax-Kamelon-RT129134-0.000001.tar.gz, CXW, 2020; MetaCPAN )

Alt-Syntax-Kamelon-RT129134/Kamelon/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

overload-open ( S/SA/SAMCV/overload-open-1.9.6.tar.gz, SAMCV, 2020; MetaCPAN )

overload-open/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

Fl ( S/SA/SANKO/Fl-0.99.15.tar.gz, SANKO, 2020; MetaCPAN )

Fl/xs/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

Geo-Coder-DAMS ( B/BO/BOKUTIN/Geo-Coder-DAMS-0.01.tar.gz, BOKUTIN, 2020; MetaCPAN )

Geo-Coder-DAMS/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

Compiler-Lexer ( G/GO/GOCCY/Compiler-Lexer-0.23.tar.gz, GOCCY, 2020; MetaCPAN )

Compiler-Lexer/gen/test_generator.pl ( view source; MetaCPAN )

pen(my $fh, '<', $filename);
    my $script = do { local $/; <$fh> };
    close $fh;
    return $script;
}

sub template {
    return do { local $/; <DATA> };
}

sub get_constants_map {
    return Loa

ISAL-Crypto ( B/BU/BURII/ISAL-Crypto-0.01_3.tar.gz, BURII, 2019; MetaCPAN )

ISAL-Crypto/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

Imager-Screenshot ( T/TO/TONYC/Imager-Screenshot-0.014.tar.gz, TONYC, 2019; MetaCPAN )

Imager-Screenshot/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

Gazelle ( K/KA/KAZEBURO/Gazelle-0.49.tar.gz, KAZEBURO, 2019; MetaCPAN )

Gazelle/lib/Plack/Handler/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-ThreadsForks ( L/LN/LNATION/Devel-ThreadsForks-0.08.tar.gz, LNATION, 2019; MetaCPAN )

Devel-ThreadsForks/lib/Devel/ThreadsForks.pm ( view source; MetaCPAN )

$0 )
          or _die("Could not open script for reading '$0': $!");
        my $script= do { local $/; <IN> };
        close IN;

        # update the script
        if ( $script =~
          s#(BEG

File-Locate-Iterator ( K/KR/KRYDE/File-Locate-Iterator-28.tar.gz, KRYDE, 2019; MetaCPAN )

File-Locate-Iterator/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

DDCCI ( S/SK/SKUPSY/DDCCI-0.003.tar.gz, SKUPSY, 2019; MetaCPAN )

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

MsgPack-Raw ( J/JA/JACQUESG/MsgPack-Raw-0.05.tar.gz, JACQUESG, 2019; MetaCPAN )

MsgPack-Raw/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

Filter-gunzip ( K/KR/KRYDE/Filter-gunzip-8.tar.gz, KRYDE, 2019; MetaCPAN )

Filter-gunzip/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

XML-Char ( J/JK/JKUTEJ/XML-Char-0.04.tar.gz, JKUTEJ, 2019; MetaCPAN )

XML-Char/lib/XML/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

Devel-MaintBlead ( L/LN/LNATION/Devel-MaintBlead-0.09.tar.gz, LNATION, 2019; MetaCPAN )

Devel-MaintBlead/lib/Devel/MaintBlead.pm ( view source; MetaCPAN )

$0 )
          or _die("Could not open script for reading '$0': $!");
        my $script= do { local $/; <IN> };
        close IN;

        # update the script
        if ( $script =~
          s#(\s*

Lingua-Identify-CLD2 ( K/KN/KNI/Lingua-Identify-CLD2-0.04_1-TRIAL.tar.gz, KNI, 2019; MetaCPAN )

Lingua-Identify-CLD2/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

Net-DNS-Native ( O/OL/OLEG/Net-DNS-Native-0.22.tar.gz, OLEG, 2019; MetaCPAN )

Net-DNS-Native/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

Sys-Syslog ( S/SA/SAPER/Sys-Syslog-0.36.tar.gz, SAPER, 2019; MetaCPAN )

Sys-Syslog/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