Yet Another CPAN Grep

Thrift-XS ( A/AG/AGRUNDMA/Thrift-XS-1.04.tar.gz, AGRUNDMA, 2011; MetaCPAN )

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

smartmatch-engine-core ( D/DO/DOY/smartmatch-engine-core-0.02-TRIAL.tar.gz, DOY, 2011; MetaCPAN )

smartmatch-engine-core/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

Text-Upskirt ( S/SI/SIMCOP/Text-Upskirt-0.100.tar.gz, SIMCOP, 2011; MetaCPAN )

Text-Upskirt/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-GSM ( F/FR/FROLLER/Audio-GSM-0.03.tar.gz, FROLLER, 2011; MetaCPAN )

Audio-GSM/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-Parser2-XS ( Z/ZZ/ZZZ/HTTP-Parser2-XS-0.01.tar.gz, ZZZ, 2011; MetaCPAN )

HTTP-Parser2-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

Devel-ContinuousProfiler ( J/JJ/JJORE/Devel-ContinuousProfiler-0.12.tar.gz, JJORE, 2011; MetaCPAN )

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

Internals-CountObjects ( J/JJ/JJORE/Internals-CountObjects-0.05.tar.gz, JJORE, 2011; MetaCPAN )

Internals-CountObjects/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

Crypt-DSA ( A/AD/ADAMK/Crypt-DSA-1.17.tar.gz, ADAMK, 2011; MetaCPAN )

Crypt-DSA/lib/Crypt/DSA/Key.pm ( view source; MetaCPAN )

$fname = delete $param{Filename}) {
        open FH, $fname or return;
        my $blob = do { local $/; <FH> };
        close FH;
        $param{Content} = $blob;
    }
    $key->deserialize(%param);

Queue-Mmap ( I/IE/IEFREMOV/Queue-Mmap-0.11.tar.gz, IEFREMOV, 2011; MetaCPAN )

Queue-Mmap/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

XS-Object-Magic ( F/FL/FLORA/XS-Object-Magic-0.04.tar.gz, FLORA, 2011; MetaCPAN )

XS-Object-Magic/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

Statistics-useR ( X/XI/XINZHENG/Statistics-useR-0.1.1.tar.gz, XINZHENG, 2011; MetaCPAN )

Statistics-useR/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

Statistics-CountAverage-XS ( I/IE/IEFREMOV/Statistics-CountAverage-XS-0.01.tar.gz, IEFREMOV, 2011; MetaCPAN )

Statistics-CountAverage-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

VMS-Device ( C/CB/CBERRY/VMS-Device-0_10.zip, CBERRY, 2011; MetaCPAN )

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

Catalyst-View-HTML-Mason ( F/FL/FLORA/Catalyst-View-HTML-Mason-0.18.tar.gz, FLORA, 2011; MetaCPAN )

Catalyst-View-HTML-Mason/lib/Catalyst/Helper/View/HTML/Mason.pm ( view source; MetaCPAN )

class {
    my ($self, $helper) = @_;
    my $file = $helper->{file};
    (my $template = do { local $/; <DATA> }) =~ s/^\s\s//g;
    $helper->render_file_contents($template, $file);
}


1;



=pod

=

Digest-MurmurHash3 ( D/DM/DMAKI/Digest-MurmurHash3-0.01.tar.gz, DMAKI, 2011; MetaCPAN )

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

Crypt-OpenSSL-X509 ( D/DA/DANIEL/Crypt-OpenSSL-X509-1.800.2.tar.gz, JONASBN, 2011; MetaCPAN )

Crypt-OpenSSL-X509/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

Gtk2-WebKit ( F/FL/FLORA/Gtk2-WebKit-0.09.tar.gz, FLORA, 2011; MetaCPAN )

Gtk2-WebKit/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

ZeroMQ-Raw ( J/JR/JROCKWAY/ZeroMQ-Raw-0.01.tar.gz, JROCKWAY, 2011; MetaCPAN )

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

Mail-Send-Loop ( K/KX/KXJ/Mail-Send-Loop-0.3.tar.gz, KXJ, 2011; MetaCPAN )

Mail-Send-Loop/lib/Mail/Send/Loop.pm ( view source; MetaCPAN )

 "  Error: Cannot find $emlf\n";
		return 0;
	}

	open(INPUT, $emlf);
	my $content = do { local $/; <INPUT> };
	close INPUT;
	#$content =~ s/\x0a\./\x0a\.\./sg;			# . at beginning of the line n

\.eml$/i){
				open(INPUT, $org) or die "Could not open file: org\n";
				my $content = do { local $/; <INPUT> };
				close INPUT;

				&sendMail_OneTcpSession(\$mail_socket, shift @mailSender, s

Sys-Info-Driver-Windows ( B/BU/BURAK/Sys-Info-Driver-Windows-0.78.tar.gz, BURAK, 2011; MetaCPAN )

Sys-Info-Driver-Windows/ppport.h ( view source; MetaCPAN )

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

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

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

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

  # Temporarily remove C/XS