perl初心者のサバンナと申します。

こちらで配布されているＣＳＶエディタを利用させていただいております。

ＣＳＶエディタで作成したＣＳＶファイルがあり、
エディタのcgiからではなく、他のcgi,htmlから
ＣＳＶファイルを検索して、ある項目がヒットしたら
その行を削除もしくはその行のある項目を更新したいのですが

（例えば、項目3番目が検索によりヒットした行があるので、
項目5番目の数字を１増やす・・・）

どのようにしたら良いのでしょうか？

もしよろしければ、どなたかご指導お願いいたします。

ＣＳＶエディタは、項目数を増やしただけで、他の改造は行っておりません。

>項目3番目が検索によりヒットした行があるので、
>項目5番目の数字を１増やす・

このように用途が決まっていればそのままプログラムを書けば良いんじゃないかと思います。
汎用的に作ると難しいかもしれません。


------------------------------------------
#!/usr/bin/perl

$str = "ccc";
$flag = 0;

open(OPEN,"xxxx.csv");
@LOG = <OPEN>;
close(OPEN);

foreach(@LOG){
	@logs = split(/,/);
	if(index($_,$str) > -1){
		$logs[2]++;
		$flag = 1;
	}
	push(@newdata,join(",",@logs));
}

if($flag == 1){
	open(OUT,"> xxxx.csv");
	print OUT @newdata;
	close(OUT);
}
------------------------------------------
こんなのはどうでしょう。

Sim様

ありがとうございます。できました！
先日もご指導いただきありがとうございました。
またよろしくお願いいたします。