Форум АНТИЧАТ - Скрипт, макрос

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- Болталка (https://forum.antichat.xyz/forumdisplay.php?f=46)

- - Скрипт, макрос (https://forum.antichat.xyz/showthread.php?t=92518)

Скрипт, макрос

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

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

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

Пж! Помогите! Позарес нужно!

накатал простенький парсер
линк

Спасибо! Помогло!

на входе: in.txt
пр. in.txt:

Цитата:

id:name:assword:login
id:name:assword:login
id:name:assword:login

на виходе: out.txt
пр. out.txt:

Цитата:

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

На каком языке програмировали?

perl вроде как

Ок. Пасиба большое.