▼スレッド
│
└◇853:補足＆追加 [moon] 11/30 13:36

> 3. sub sagaに、
> 　　if(open(FILE, '<', $colodat)){
> 　　　　$coloid = <FILE>;
> 　　　　close(FILE);
> 　　　　($coloid, $colonm) = split(/△/, (split(/<>/, $coloid))[4]);
> 　　}
> を追加し、あとは表示したい箇所で$coloidおよび$colonmを表示する。

追加する場所は&list_orderの上です。

追加で、
sub find_bestに、
　　$coloimg = $ig if($coloimg eq '' && $id eq $coloid && $nm eq $colonm);
を追加して画像ファイル名を取得します。

$coloidがID、$colonmが名前、$coloimgが画像ファイル名です。
ただし、$coloimgは既に削除済みの場合は空になります。