商品の重さの合計で、送料がわかるように、カゴの中身を表示させる画面で重量の合計も表示させたいのですが
よい方法あるでしょうか、、
重量の合計がわかれば、別表から大体の送料がわかるようにしたいのです。

商品ごとに
<input type="hidden" name="weight" value="重量">
を記述しておきます。重量に小数点は使えません。

sub input_to_cart の
print FILE "$date_num\t$in{'_gname'}\t$SHOKEI\n"; を
print FILE "$date_num\t$in{'_gname'}\t$SHOKEI\t$in{weight}\n"; に変更
sub mado と sub cfm で
($code,$name,$fee) = split(/\t/,$_,3); があるのでこれを
($code,$name,$fee,$weight) = split(/\t/,$_,4); に変更し
$WEIGHT_ALL += $weight; とすれば、総重量=$WEIGHT_ALL です。
HTMLは考えて下さい。

おまけ
@OMOSA = ('500=100','1000=250','2000=400','3000=550','4001=700');
（右辺は送料金額、左辺はその金額で送れる重さの限度で、最後はそれ以上送料が上がらない場合の設定値）
を作っておき、
foreach (@OMOSA) {
    ($gendo, $kingaku) = split(/=/, $_);
    $soryo = $kingaku; last if $gendo >= $WEIGHT_ALL;
}
とすれば、総重量に対する送料 $soryo が求められます。