PDA

Просмотр полной версии : Скрипт, макрос


termos.tif
19.11.2008, 12:26
Люди! Сейчас! Срочно нужен скрипт или макрос, который меняет структуру текста. Тоесть у меня есть текст такого вида:
id:name:assword:login
id:name:assword:login
id:name:assword:login

а нужно
login:assword:id:name
login:assword:id:name
login:assword:id:name

Могу заплатить!

termos.tif
19.11.2008, 12:32
Пж! Помогите! Позарес нужно!

crystalbit
19.11.2008, 15:04
накатал простенький парсер
линк (http://parsers.info/soft/parser2.exe)

termos.tif
19.11.2008, 16:08
Спасибо! Помогло!

eLWAux
19.11.2008, 16:10
на входе: in.txt
пр. in.txt:id:name:assword:login
id:name:assword:login
id:name:assword:login

на виходе: out.txt
пр. out.txt:login:assword:id:name
login:assword:id:name
login:assword:id:name

perl:
system('cls');

#################################

sub saveFile
{
open(myFILE,">$_[0]") || die "error: $!";
print myFILE $_[1];
close(myFILE);
}

#################################

$res = '';
open myFILE, "<in.txt" or die $!;
while (<myFILE>) {
chomp;
@l = split(/:/,$_);

print @l[3].':'.@l[2].':'.@l[0].':'.@l[1]."\n";
$res.=@l[3].':'.@l[2].':'.@l[0].':'.@l[1]."\n";
}
saveFile('out.txt',$res);
close myFILE;

__END__
(c)oded by eLWAux

termos.tif
19.11.2008, 16:11
На каком языке програмировали?

gisTy
19.11.2008, 16:19
На каком языке програмировали?
perl вроде как

termos.tif
19.11.2008, 16:21
Ок. Пасиба большое.