平均を求めるスクリプトを製作しています。

質問

下のは見てもらえれば分かると思うのですが、@arrayの平均を求めるプログラムです・・・。
これに、@arrayにある値ではなく、5つほど並べたフォームのプルダウンメニューの値（1～10）から平均を求めるよう改造したいのですが、
どうしたらよいかまったく分からず困っています・・・・（レビュー感覚のCGIを作成したいと思っています・・・）
------------------------------------------------------
#!/usr/local/bin/perl
$sum = 0 ;
@array = (10,9,5,8,7,7,10,9,5,8,7,7,1);

foreach $tmp (@array){
$sum+=$tmp;
}

$toukou=@array;
$sum/=@array;

print "Content-type: text/plain\n\n";
print "現在の投稿数は $toukou個です。\n";
printf ("平均は %.2fです。",$sum);
exit;
------------------------------------------------------
よろしくお願いします。

回答No.1

noname#19175 · ベストアンサー

#!/usr/local/bin/perl
$sum = 0 ;
@array = ();
$array[0]=プルダウンメニューの値１;
$array[1]=プルダウンメニューの値２;
$array[2]=プルダウンメニューの値３;
$array[3]=プルダウンメニューの値４;
$array[4]=プルダウンメニューの値５;

以降同じ

お礼

あ、なるほど！とても参考になります。
本当にありがとうございます。