cgi/lib/func.plの 56行の ($no,$c_id,$skin2,$g_name,$price,$postage,$weight,$pack,$nw,$osu,$ure,$hide,$no_s,$no_p,$no_w,$kosu,$cool,$wrap,$msg,$msg2,$msg3,$msg4,$msg5,$img)=split(/,/,$ln); を ($no,$c_id,$skin2,$g_name,$price,$postage,$weight,$pack,$nw,$osu,$ure,$hide,$no_s,$no_p,$no_w,$kosu,$cool,$cp,$wrap,$msg,$msg2,$msg3,$msg4,$msg5,$img)=split(/,/,$ln); と変更してください。 $coolのあとに ,$cp と入れるだけです。