perl

ハッシュ関数

perlのハッシュ(連想配列)ではなく、wikipedia:ハッシュ関数。 #!/usr/bin/perl -W @buf = qw(ab 1 cdef 22 ghijk 333); for ($i=0 ; $i<@buf ; $i +=2) { $key = $buf[$i]; $value = $buf[$i + 1]; $hash = &get_hash($key); print "hash\{$key\} = $value\…

文字コード

emacs で html を書いてるときなんか、 とか書いてるんですが、perl の場合、どうしよう、と。 #!/usr/bin/perl --*-- coding: utf-8 --*-- とかすると、perl へのオプション*1ととられてしまうだろうなあ、と。 で、調べたらありました。 「プログラミング…

webサイトへの速度を測る

ソフトをダウンロードする際、本家サイトとミラーサイトのどっちが速いんだろう、ってな疑問はよくあると思うんですが、どうでしょう。 以前はpingを送って速いほうを選んでたんですが、最近は世知辛い世の中ですから、ECHOプロトコルはブロックされてしまう…