perl -p -i.bak -e "s/^-//g" foo.dat