if(index($source, 'no such file') != -1) { print "Found it \n"; }