Perl One Liner on Linux Command - Replace all word

Replace all apple to orange by Perl one liner on Linux.

find * | xargs perl -pi -e 's/apple/orange/g';