Yet Another CPAN Grep

UAV-Pilot-Video-Ffmpeg ( T/TM/TMURRAY/UAV-Pilot-Video-Ffmpeg-0.3.tar.gz, TMURRAY, 2015; MetaCPAN )

UAV-Pilot-Video-Ffmpeg/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

Eixo-Zone-Driver ( F/FR/FRMADEM/Eixo-Zone-Driver-0.03.tar.gz, FRMADEM, 2015; MetaCPAN )

Eixo-Zone-Driver/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

UAV-Pilot ( T/TM/TMURRAY/UAV-Pilot-1.3.tar.gz, TMURRAY, 2015; MetaCPAN )

UAV-Pilot/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

Path-Hilbert-XS ( G/GO/GONZUS/Path-Hilbert-XS-0.003.tar.gz, GONZUS, 2015; MetaCPAN )

Path-Hilbert-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

HTTP-Headers-Fast-XS ( X/XS/XSAWYERX/HTTP-Headers-Fast-XS-0.001.tar.gz, XSAWYERX, 2015; MetaCPAN )

HTTP-Headers-Fast-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

MarpaX-Demo-SampleScripts ( R/RS/RSAVAGE/MarpaX-Demo-SampleScripts-1.04.tgz, RSAVAGE, 2015; MetaCPAN )

MarpaX-Demo-SampleScripts/scripts/grammar.inspector.01.pl ( view source; MetaCPAN )

y Kegler.

# ---------------------

my $grammar = Marpa::R2::Scanless::G->new({ source => \do {local $/; <DATA>}});
my $fmt = "%5s %-20s %-20s %s\n";
printf $fmt, 'depth', 'ruleName', 'lhsName', 'rhsN

C-TinyCompiler ( D/DC/DCMERTENS/C-TinyCompiler-0.05.tar.gz, DCMERTENS, 2015; MetaCPAN )

C-TinyCompiler/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-Simple ( K/KI/KIMOTO/Image-PNG-Simple-0.07.tar.gz, KIMOTO, 2015; MetaCPAN )

Image-PNG-Simple/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-PiFace ( R/RO/ROBERTOF/Device-PiFace-0.01.tar.gz, ROBERTOF, 2015; MetaCPAN )

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

B-Utils1 ( R/RU/RURBAN/B-Utils1-1.05.tar.gz, RURBAN, 2015; MetaCPAN )

B-Utils1/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

Parse-JCONF ( O/OL/OLEG/Parse-JCONF-0.05.tar.gz, OLEG, 2015; MetaCPAN )

Parse-JCONF/lib/Parse/JCONF.pm ( view source; MetaCPAN )

 $fh, '<:utf8', $path
		or return $self->_err(IO => "open `$path': $!");
	
	my $data = do {
		local $/;
		<$fh>;
	};
	
	close $fh;
	
	$self->parse($data);
}

sub last_error {
	return $_[0]->{last_erro

r configs)

=head1 SYNOPSIS

    use strict;
    use Parse::JCONF;
    
    my $raw_cfg = do { local $/; <DATA> };
    my $parser = Parse::JCONF->new(autodie => 1);
    
    $cfg = $parser->parse($raw

Net-IP-LPM ( T/TP/TPODER/Net-IP-LPM-1.10.tar.gz, TPODER, 2015; MetaCPAN )

Net-IP-LPM/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

B-Utils ( E/ET/ETHER/B-Utils-0.27.tar.gz, ETHER, 2015; MetaCPAN )

B-Utils/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

ALPM ( A/AP/APG/ALPM-3.06.tar.gz, APG, 2015; MetaCPAN )

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

LCS-XS ( W/WO/WOLLMERS/LCS-XS-0.04.tar.gz, WOLLMERS, 2015; MetaCPAN )

LCS-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

Time-Monotonic ( D/DA/DAVID/Time-Monotonic-v0.9.8.tar.gz, DAVID, 2015; MetaCPAN )

Time-Monotonic/lib/Time/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-SCTP ( A/AL/ALUCILLO/Net-SCTP-1.02.tar.gz, ALUCILLO, 2015; MetaCPAN )

Net-SCTP/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

Cog ( I/IN/INGY/Cog-0.11.tar.gz, INGY, 2015; MetaCPAN )

Cog/lib/Cog/WebApp.pm ( view source; MetaCPAN )

index.html";
    open INDEX, $index_file or die "Can't open '$index_file'";
    my $html = do {local $/; <INDEX>};
    close INDEX or die;

    my $time = scalar(gmtime);
    $time .= ' GMT' unless $t

ONTENT_TYPE} =~ m!application/json! and
        $env->{CONTENT_LENGTH};
    my $json = do { my $io = $env->{'psgi.input'}; local $/; <$io> };
    $env->{post_data} = $self->json->decode($json);
}

1;

Algorithm-BloomFilter ( S/SM/SMUELLER/Algorithm-BloomFilter-0.02.tar.gz, SMUELLER, 2015; MetaCPAN )

Algorithm-BloomFilter/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

Dallycot ( J/JS/JSMITH/Dallycot-0.151630.tar.gz, JSMITH, 2015; MetaCPAN )

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