mail;pass

[m9chik]

у меня есть base.txt вида mail;pass и вот мне надо все mail вытащить в отдельный *.txt
У кого есть какйнить проги иль perl скрипт ? прос по зарез нужно!!!

[brlamo]

а зачем руки... это самому написать 5 мин делов. Тем более ограничений в выборе языка нет.

[diznt]

ну знаешь блин..... нектрые вообще не знают как с этим бороться...
я адын из них )))) ну покачто мне особо не надо эт знать

[mouse.pro]

Вот на php пару строчек

<?
$base = fopen("base.txt", 'r');
$result = fopen("result.txt", 'w+');

while(!feof($base)) {
$account = fgets($base, 999);
$mail = explode(";", $account);
fputs($result, $mail[0]."\r\n");
}

fclose($base);
fclose($result);
?>

[krypt3r]

Код-то самый простецкий. Вариант на перле

#!/usr/bin/perl

use strict;
use warnings;
#use diagnostics;

die 'Usage: ', $0, ' [input-file output-file]', "\n" unless scalar @ARGV == 2;

open my $INFILE, '<', $ARGV[0] or die "open error: $!\n";
open my $OUTFILE, '>', $ARGV[1] or die "create error: $!\n";
print $OUTFILE (split /;/, $_)[0], "\n" while (<$INFILE>);
close $OUTFILE;
close $INFILE;
exit 0;

[CrazyStudentS_Mi}{]

а если зажать Alt в Word`e то можно выделить в любом месте прямоугольник и удалить, выравнивай по какому нужно краю и удаляй пассы

[aka dexter]

ЧТО КАСАЕТСЯ ТАКИХ ПРОБЛЕМ, Я В Excel ИХ РЕШАЮ.

[ToniKapuchon]

http://piramidalint.narod.ru/Achat.rar
екзешник набросал только, что выводит в отдельный файл то что до ";"

[BuG_4F]

СПС всё рабит !
Так-же можна аськи от паролей отделять )