[Comm] Как удалить пробелы

[Denis Nazarov]

В сообщении от Monday 01 September 2008 09:53:00 Kharitonov A. Dmitry написал(а):
> На чем вы предложите написать?

да хотя бы на перле :)


#!/usr/bin/perl

my $str="   123   123  ";
print "$str\n"; # получаем "   123   123  "
$str =~ s/^( )*//ig;
print "$str\n";  #  получаем "123   123  "