Whiteのふりーとーく

自明性、あるいは名前重要。

結局仕様書では話にならず他人の書いたperlのコードを読んでいるわけだが。

$larger = ($num1 < $num2) ? $num2 : $num1;

というコードを見て、ふと以下のようなコードを思い付いた。

$larger = (sort ($num1,$num2))[-1];

結果だけ見ればもちろん同じ意味のコードだけどね。

_素直にMAX()とかLARGER()とかいう関数定義しろよ、という話もある。

Wayne : 他にも、Effective Perlにはこんなのが紹介されてましたですよ：$smaller = [$a => $b]->[$b <= $a]; $smaller = ($a, $b)[$b <= $a]; $larger = [$a => $b]->[$a <= $b]; $larger = ($a, $b)[$a <= $b];

Wayne : sort使う奴は、二つじゃなくてリストならなんでも＆いくつでもOKなのが魅力カモ？

通りすがりのMad-Pという者です : sortは比較式を指定しないと<=>でなくcmpしちゃいますよ。

TrackBack:

御意見・御感想の宛先white@niu.ne.jp

Main | FreeTalk | 小説 | うがー | BBS | Wiki | (Mail)

Diary Robots: [CATS] [DSN] [さおりな] [あゆあゆ] [栞] [HNN] [nA] [ひかりん] [Rabbit] [ひよりん]

トピック別索引：ゲーム| 本| TeX| コンピュータ |ガンパレ話

#過去分一覧

最新版
09. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 08. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 07. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 06. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 05. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 04. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 03. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 02. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 01. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 00. . 12 . 11 . 10 . 9 . 8 . 7 . 6 . 5 . 4 . 3 . 2 . 1 99. . 12 . 11 . 10 . 9 . 8 . 7 6 5 4 3 2 1
98. 12 11 10 9 8 7 6 97.6-12 1-5 96.7-12