Нужен парсер

Нужен парсер,что бы из

INSERT INTO `tbl_ftp` VALUES (410, 336, 'name', ',pass', '/host_www/site.ru/www', 'www.site.ru', '2004-03-15 15:24:45', 'user', 'false', 'soft', 50000000, 0, 0, 0, 0, 0, 26397632, 0, 0, 0, 0, 0, '1', '', '/etc/apache2/con/site.ru/www.conf', 'no', 560);

зделал нормальный вид:

ftp://user[email protected]

user[email protected]

Возможно такой нарыть?

 

возможно накодить

 

Если нет возможности залить обратно в базу и обработать запросами, парси этим:
_http://webdos.freezoka.com/files/htmllerz.zip

 

чото так

Code:

#!usr/bin/perl
&pars;
sub pars {
open(FILE, "db.txt");
@parser = <FILE>;
close(FILE);
open(A, ">>ftp.txt");
foreach $parser (@parser)
{
($q, $w, $name, $r, $pass, $www, $site, $date, $user, $s, $y, $u,) = split(",",$parser);
print A "ftp://$user:$pass;$site\n";
tr/a-zA-Z//cd
}}
close(A);

потом пару символов в блокнотом заменить придётся

 

Я для этого использую EmEditor http://depositfiles.com/files/0vin4n9ua
Ctrl + H
Найти: ^INSERT INTO `tbl_ftp` VALUES \(\d+, \d+, '(.*?)', '(.*?)'.*\n
Заменить на: ftp://\1:\[email protected]\n
Использовать регулярные выражения: да
Заменить все

И ненадо никаких парсеров

 

Нормально формирует,но домены везде ftp.site.ua