perl -pi.bak -e "s/^\n$/\r\n/" <filename>