Yet Another CPAN Grep

Authen-Krb5-Admin ( S/SJ/SJQUINNEY/Authen-Krb5-Admin-0.17.tar.gz, SJQUINNEY, 2013; MetaCPAN )

Authen-Krb5-Admin/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-SZaru ( S/SM/SMUELLER/Math-SZaru-0.01.tar.gz, SMUELLER, 2013; MetaCPAN )

Math-SZaru/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

BIE-Data-HDF5 ( X/XI/XINZHENG/BIE-Data-HDF5-0.02.tar.gz, XINZHENG, 2013; MetaCPAN )

BIE-Data-HDF5/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

Number-AnyBase ( E/EM/EMAZEP/Number-AnyBase-1.60000.tar.gz, EMAZEP, 2013; MetaCPAN )

Number-AnyBase/lib/Number/AnyBase.pm ( view source; MetaCPAN )

comparison
    use IO::Compress::Zip qw(zip);
    
    $| = 1;
    
    ( my $dnastring = do { local $/; <DATA> } ) =~ tr/\n//d;
    
    # dna string in decimal form (itself a compression)
    my $dn

VMS-Logical ( P/PF/PFAUT/VMS-Logical-0_6.zip, PFAUT, 2013; MetaCPAN )

VMS-Logical/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-DTrace-Provider ( C/CH/CHRISA/Devel-DTrace-Provider-1.11.tar.gz, CHRISA, 2012; MetaCPAN )

Devel-DTrace-Provider/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

UNIVERSAL-has ( B/BP/BPMEDLEY/UNIVERSAL-has-0.05.tar.gz, BPMEDLEY, 2012; MetaCPAN )

UNIVERSAL-has/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

Ravenel ( R/RD/RDIETRICH/Ravenel-1.1.tar.gz, RDIETRICH, 2012; MetaCPAN )

Ravenel/lib/Ravenel/Tag/Include.pm ( view source; MetaCPAN )

e tag ($self->{'tag_inner'})\n");
			}
		}

		open(F, $filename);
		$self->{'expanded'} = do { local $/; <F> };
		close F;
	}

	my Ravenel::Document $doc = $self->{'ravenel_document'};
	substr(
		$doc

Ravenel ( R/RD/RDIETRICH/Ravenel-1.1.tar.gz, RDIETRICH, 2012; MetaCPAN )

Ravenel/lib/Ravenel/Document.pm ( view source; MetaCPAN )

$filename, $!") if ( not -f $filename );

			open(F, $filename);
			$self->{'document'} = do { local $/; <F> };
			close F;
		}
		$self->{'prefix'}                    ||= 'r:';
		$self->{'dynamic'}

Win32-GlobalHotkey ( T/TA/TAUNGER/Win32-GlobalHotkey-0.01.tar.gz, TAUNGER, 2012; MetaCPAN )

Win32-GlobalHotkey/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

App-digestarchive ( H/HO/HOLLY/App-digestarchive-0.044.tar.gz, HOLLY, 2012; MetaCPAN )

App-digestarchive/README.pod ( view source; MetaCPAN )

le_or_buffer;

if (!-t STDIN || defined $ARGV[0] && $ARGV[0] eq "-") {
	$file_or_buffer = do { local $/; <STDIN> };
} elsif (defined $ARGV[0] && -f $ARGV[0]) {
    $file_or_buffer = $ARGV[0];
} else {

Ogg-Theora-LibTheora ( V/VI/VIGITH/Ogg-Theora-LibTheora-0.04.tar.gz, VIGITH, 2012; MetaCPAN )

Ogg-Theora-LibTheora/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

Mason-Tidy ( J/JS/JSWARTZ/Mason-Tidy-2.57.tar.gz, JSWARTZ, 2012; MetaCPAN )

Mason-Tidy/lib/Mason/Tidy/App.pm ( view source; MetaCPAN )

ce) ) {
        return $mt->tidy($source);
    }
    elsif ($pipe) {
        my $source = do { local $/; <STDIN> };
        print $mt->tidy($source);
    }
    else {
        foreach my $file (@argv)

Devel-SlowBless ( B/BH/BHOLZMAN/Devel-SlowBless-0.06.tar.gz, BHOLZMAN, 2012; MetaCPAN )

Devel-SlowBless/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-Heatmap ( K/KA/KAWAMURAY/Imager-Heatmap-0.03.tar.gz, KAWAMURAY, 2012; MetaCPAN )

Imager-Heatmap/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-Derivative_XS ( A/AU/AUFFLICK/Math-Derivative_XS-0.02.tar.gz, AUFFLICK, 2012; MetaCPAN )

Math-Derivative_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

Judy ( J/JJ/JJORE/Judy-0.41.tar.gz, JJORE, 2012; MetaCPAN )

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

Eval-Compile ( G/GR/GRIAN/Eval-Compile-0.11.tar.gz, GRIAN, 2012; MetaCPAN )

Eval-Compile/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

MMapDB ( O/OP/OPI/MMapDB-0.15.tar.gz, OPI, 2012; MetaCPAN )

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

Cocoa-BatteryInfo ( T/TY/TYPESTER/Cocoa-BatteryInfo-0.02.tar.gz, TYPESTER, 2012; MetaCPAN )

Cocoa-BatteryInfo/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