[koresaram]

чувак, ты гений спасибо!
open (NEW,">>$newpath/$f");
chomp($data[1]);
print NEW "\'ext_1\',\"$data[1]\"\n";
print "выполнено добавление имени $data[1] в файл $f";
close (NEW);
тепер пишет как надо
'ext_1',"Ольга"