- 1
- 2
- 3
- 4
- 5
- 6
- 7
sub removeSpaces {
my $str = $_[0];
while ( $str =~ /[\t ]+/ ) {
$str = $`.$';
}
return $str;
}
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
Всего: 1
−121
sub removeSpaces {
my $str = $_[0];
while ( $str =~ /[\t ]+/ ) {
$str = $`.$';
}
return $str;
}
Найдено при разборе скрипта подготовки данных для тестов.