$ perl -p -i -e 's/,$/ /' somefile.txt