perl -lp015 -e";" -i.bak filename.txt