perl -pi.bak -e "s///;"