02/01/07 22:40
>>1
排他制御が必要なら PostgreSQL or MySQL
必要無いなら PerlでCSVでもいじったらどうでしょか。
--------------------------------------------------
$file = 'file.csv';
open(EDIT,"+<$file");
@data = <EDIT>;
for (0..$#data) {
$gyou = @data[$_];
chomp $gyou;
@cell = split(/\,/, $gyou);
#ここで編集したりいろいろ・・・etc
@data[$_] = join("\,", @cell)."\n";
}
seek(EDIT, 0, 0);
print EDIT @data;
truncate(EDIT, tell(EDIT));
close(EDIT);
--------------------------------------------------