spaces in filenames using find | xargs perl -ne '<script>'

On Linux and Mac OS X, I'm doing something like this to print a regex
substutution of matching lines in a batch of files:

find . -name 'somefile' | xargs perl -ne 'print if
s/search/replace/'

Problem is spaces appearing in the output of "find" cause errors.

I tried

find . -name 'somefile' -printf '"%p"\n' | xargs --max-args=1 perl
-ne 'print if s/search/replace/'

... and other variations, but no luck, perl sees the file paths
containing spaces as seperate arguments.

Any suggestions?

Thanks,

Isao