perl -pi -e 's/apple/orange/gi'