#!/usr/bin/perl

use strict;
use warnings;

die "usage: $0 <pdffile> <searchterm>"
  unless @ARGV == 2;

open( CMD, "/usr/bin/pdftotext $ARGV[0] - |" )
  || die "cannot open $ARGV[0]: $!";

while( <CMD> ) {
  print if( /$ARGV[1]/ );
}