Linups_Troolvalds, и правда, страшно.
Ради интереса попробовал написать скрипт на повершелле, хоть и совсем не знаю этот язык.
Вот мой быдлокод:
$file = Get-Content file1.txt; # Читаю файл file1.txt в массив строк
$numFiles = 0; # Порядковый номер выходного файла
$numStringPF = [System.Math]::Floor($file.Length / 5); # Число строк в выходном файле
for($i = 0; $i -lt $file.Length; $i++){ # Перебираю строки
if ($i % $numStringPF -eq 0 -and $numFiles -lt 5){ # Если выходной файл заполнился
$numFiles = $numFiles +1 # Увеличиваем номер выходного файла
}
echo $file[$i] >> "text$numFiles"
}
-eq - это оператор сравнения,
-lt - меньше,
-gt - больше.
Неактивен
Lord_Evil пишет:Linups_Troolvalds, проверь мой скрипт на скорость.
"time" -f "Затрачено времени: %e, Макс.резидентный размер процесса (Кбайт): %M" cat text| ./split.pl Затрачено времени: 0.30, Макс.резидентный размер процесса (Кбайт): 2560
Спасибо, тоже не плохой результат, если сравнить с пхп.. 0_0 и памяти сожрало меньше всех ))
Интеллигент боится лишь одного — касаться темы зла и его корней, потому что справедливо полагает, что здесь его могут сразу выeбaть телеграфным столбом.©
Неактивен