[Информация] Редактирование базы под свои нужды

[SetFer]

Привет форумчанам.

Имеется база для брута, вид log;pass (txt файл)

Задача - удалить из файла базы все пары log;pass в которых пароль меньше 8 символов.

Идеи?

P.S Ищу - скрипт, решающий эту задачу(пхп\перл),код на Делфи,или лучшим вариантом отдельная тулза с простым интерфейсом.

P.S.S Не кидаться какашками мол," в школе паскаль не учил?" и т.д

[Jumper]

ну это не сложно, кидаешь на форму 2 TMEMO, OpenDialog, грузишь в 1 мемо - акки, во 2 - пассы.

и делаешь цикл:

Цитата: for (int i= 0; i<Memo1->Lines->Count; i++) { if (Length(Memo2->Lines->Strings[i])<8) { Delete(Memo1->Lines->Strings[i]); Delete(Memo2->Lines->Strings[i]); } }

ну или делай как знаешь)

[SetFer]

Цитата: Сообщение от Jumper ну это не сложно, кидаешь на форму 2 TMEMO, OpenDialog, грузишь в 1 мемо - акки, во 2 - пассы. и делаешь цикл: ну или делай как знаешь)

А как изменить код чтоб загружать полностью файл акк;пасс,а не по-раздельности,и чтоб программа смотрела только например длину после ";"??

Простите,но... Ап темке

[SetFer]

Кому может понадобится:

<?php
$ar=file('start.txt');
$han=fopen('end.txt','a');
foreach($ar as $val)
{
	$pass=explode(';',$val);
	if (strlen(trim($pass[1]))>7) fwrite($han,$val);
}
fclose($han);
echo "ok";
?>

начальный файл start.txt должен находиться в папке со скриптом
обработанный (с паролями больше 7 символов) end.txt появится в папке со скриптом
после завершения работы скрипта на экран выведется "ok"

cпасибо хакзоне