2007-07-20から1日間の記事一覧

はてダラ 改造

Perl

やっぱり、パスワードの入力ではエコーバックしないでほしいよなぁ、ということでいまさらながら改造。要 Term::Prompt。 --- hw.pl.orig 2007-07-20 05:24:32.000000000 -0900 +++ hw.pl 2007-07-20 05:38:43.000000000 -0900 @@ -23,6 +23,7 @@ use File::…

h-index #2

Haskell

「わかりやすいコードではないなぁ」と言われたけど、さてどうしたものか。 命名をがんばる。 hindex :: [Int] -> Int hindex lst = length $ takeWhile cond rankedList where rankedList = zip (sortBy (flip compare) lst) [1..] cond (val, rank) = val …

高速バスの予約

発車オーライネットのシステムが腐っているっぽかったので、わざわざ JR のみどりの窓口まで高速バスのチケットを買いに行ったのだが、危うく領収書をもらい損ねるところだった。ふー。 しかし、JR四国バスの予約ページの文言はなかなか難しい。 ▼予約後の購…

一方向リスト

Python

ref:Fomalhaut of Piscis Australis : [python] どう書く？-- 一方向リスト編 ref:Fomalhaut of Piscis Australis : [python] どう書く？-- 一方向リスト編その2 ref:DARK SERVER - $ [python] どう書く？-- 一方向リスト編 def get_endpoint( linked_list )…