Массовая замена в файлах

Во всех файлах entries в иерархии сменить Pandora на Hartasara:
find . -name entries -exec perl -pi -e 's/Pandora/Hartasara/' {} \;