Fixed perl -pi -e.