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

Люди! Сейчас! Срочно нужен скрипт или макрос, который меняет структуру текста. Тоесть у меня есть текст такого вида:
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:

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

perl:

Code:

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

 

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

 

perl вроде как

 

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