print "Line $. Match ($misses) at $i, @$search [["; print @$search[$i..$i+$find_len-1]; print "]]\n";