CGIスクリプトでの計算式について教えてください（初心者）

質問

人に頼まれてEコマースサイトに組み込むためのCGIプログラムをフリーウェアを利用して作っています。エディタで開いてスクリプトの計算式の一部を書き換えたいのですがCGI初心者のためどういう計算式になるのかわかりません。@dai_charge=("")という項目がありこの("")の中に式を入れたらいいというのはわかったのですがどなたか計算式を教えてください。条件は以下のとおりです。
代金引換の手数料の計算で…
#購入金額が、10000円以上30000円未満は400円、30000以上10万円以内は600円それ以上は別途連絡とする
といった条件の計算が実行されるようにしたいのです。どなたか知識のある方お願いします。

回答No.1

BLUEPIXY · ベストアンサー

多分Perlだと思うのですが、
計算式として、"別途連絡"になった時のことは別に扱う必要があります。（計算が続行できないので）
また、１００００円未満の場合どうなるかは質問文には書かれていません。（０円？）
下記のような関数を置いて
charge(購入代金)
または
&charge(購入代金)
でその購入代金に該当する手数料を返すので利用することができます。
#
sub charge($){
my $price = @_[0];
if(10000 > $price){
return(0);#?
} elsif(30000 > $price && $price >= 10000){
return(400);
} elsif ( 100000 >= $price && $price >= 30000){
return(600);
} else {
return("別途連絡");
}
}