Perlについての質問箱 28箱目
■ このスレッドは過去ログ倉庫に格納されています
0568デフォルトの名無しさん
2006/11/24(金) 18:52:17>>233を読むと分かると思いますが後者です。
現在以下のような応急処理を行っているのですが、
要素が増えていけばif文がどんどん増えていくので、
何かいい方法はないのかなと。
$hoge = 3;
$huga = 92;
$foo = 2;
$bar = 39;
@hoge = (
$hoge,
$huga,
$foo,
$bar
);
$min = ソートサブルーチン(@hoge);
if ($min == $hoge) {
print "\$hogeが一番小さい\n";
} if ($min == $huga) {
print "\$hugaが一番小さい\n";
} if ($min == $foo) {
print "\$fooが一番小さい\n";
} if ($min == $bar) {
print "\$barが一番小さい\n";
}
■ このスレッドは過去ログ倉庫に格納されています