[решено] Работа из командной строки | Убрать все пробелы в текстовом файле

Аватара пользователя
Greyman

Re: [решено] Работа из командной строки | Убрать все пробелы в текстовом файле

Сообщение Greyman »

Да, MUNGE бы подошла, тока вот не могу пока найти ее, чтоб скачать. Из альтернатив нашел еще
InfoRapid Search & Replace
(1014 Kb) и
Gawk for Windows
(623 Kb). "Sed for Windows" весит 282 Кб. Мне кажется, что MUNGE все же поменьше должна быть, поищем-с...



Нашел таки MUNGE, Ура! Это то, что нужно, всего 10 килов в архиве! Спасибо amel27 асче раз! Скачать ее , кому тоже интересно, можно отсель:

http://www.dynawell.com/reskit/micro...2000/munge.zip
Аватара пользователя
SantaXP

Re: [решено] Работа из командной строки | Убрать все пробелы в текстовом файле

Сообщение 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-го, тока без пробелов.

Написан на скорую руку, но работает. Изображение
Ответить

Вернуться в «Хочу все знать»