$ perl -wpe 'tr/ []/_ /' < input.txt > output.txt