入力としてundefあるいは値を複数受け取り 結果として値の最小値（あるいは値が全てundefの場合はundef）を返す という処理をどう書くのがいいか？ 自分が思いつくのは以下のコードだけど、もっといい書き方あるかなぁ（簡潔明快であることが望ましい）。 my…

って処理を書きたい場合がある*1けど、そういう場合は、 my $access_allowed = eval { require Authen::Libwrap } && host_ctl('tiarra', $sock); みたいな感じでよかったらしい。って id:tokuhirom に教えてもらった *1:たとえば Tiarra (あるいはPerl) か…

諸般の事情で、ついに Tiarra ユーザーになったんですけど、Dynamic DNS を使って SSH アクセスを制限する方法 - kazuhoのメモ置き場 に書いたようにサーバのアクセス制限を hosts_access 使ってやってるので Tiarra についても同様にしたい。Perl の場合は …