[SantaXP]

Код:

#!/usr/local/bin/perl -w
use strict;

my ($in, $out) = @ARGV;
my @a; 

open IN, "<$in" or die "Can't ope file: $!";
  while(<IN>) {
   $_ =~ s/ //g;
   unshift (@a, $_);
  }
close IN;

open OUT, ">$out" or die "Can't ope file: $!";
  foreach (@a) {
    print OUT $_;
  }
close OUT;

Вот программка на PERL. Копируешь код в текстовый файл, например с именем test.pl. Далее из командной строки вызваешь:
#perl test.pl file_in file_out
Где file_in - Имя файла, где нужно убрать пробелы. file_out - Имя файла, куда будет помещён текст из 1-го, тока без пробелов.
Написан на скорую руку, но работает.