古いシステムのメンテをする必要があり、泣く泣くcshを…aliasに引数を渡せるので「\!*」とか「\!:1」で生き延びろ！俺。 ＃後者は試してないけど。

$ perl -MDigest::SHA -MHTTP::Request::Common -MLWP::UserAgent -MURI \ -e 'for (sort values %INC) { print "$_\n" if /site_perl/ }' /usr/lib/perl5/site_perl/5.8.8/HTTP/Date.pm /usr/lib/perl5/site_perl/5.8.8/HTTP/Headers.pm /usr/lib/perl5/sit…

やっと成功した…（Linux 2.6.22） まず、最初にはまった点。 root partitionの/dev/hda1、swap用の/dev/hda5とあったのだけど/dev/hda5のUUIDが起動するたびにコロコロ変わる。最近のUbuntuだと/etc/fstabでの指定方法がUUIDになっているらしいので、/dev/hd…

ノートPCにUbuntu系のディストリを入れてみたので、CapslockをCtrlに上書き。/etc/X11/xkb/keycodes/xfree86をいじる手もありそうだったが、$HOME/.Xmodmapでコントロールするのが手筋らしい。 clear Lock keysym Caps_Lock = Control_L add Control = Contr…

perl cpanコマンドのoコマンドを使うと、shift/unshift, push/popで扱える。 cpan[16]> o conf urllist urllist 0 [http://ftp.nara.wide.ad.jp/pub/CPAN/] cpan[17]> o conf urllist push ftp://ftp.u-aizu.ac.jp/pub/CPAN ftp://ftp.kddilabs.jp/CPAN/ ftp…

しょぼすぎるミスをしていたので自戒をこめてメモ。 % cat sha256.pl use strict; use warnings; use Digest::SHA qw(sha256_hex); my $digest = Digest::SHA->sha256_hex("12"); print "$digest\n"; $digest = Digest::SHA::sha256_hex("12"); print "$dige…

いたるところでもてはやされていて、遅ればせながら使ってみた。まぁ、予想通り… 最高でした。作業中のキーボード濃度が高くなってきた。

no utf8の状態で、バイト単位のsubstr()を使って、末尾が不完全なUTF-8文字になってしまった際の、削りかす除去。 $data =~ s/(?:[\xC0-\xDF]|[\xE0-\xEF][\x80-\xBF]{0,1}|[\xF0-\xF7][\x80-\xBF]{0,2})$//; こんなんで良いのかしら。あと、2バイト文字の確…

mitsu@garlic$ ruby -e 'p Class.methods - Object.methods' ["nesting"] mitsu@garlic$

mitsu@garlic$ cat hoge.rb class C end c1 = C.new def c1.hoge puts "hello world!\n" end C1 = c1.class c2 = C1.new # c2.hoge <= undefined method `hoge' for #<C:0x8076220> (NoMethodError) puts C.object_id puts C1.object_id mitsu@garlic$ ruby hoge.rb 67350</c:0x8076220>…

株式投資の流れで何となく日本経済新聞をとっているのだけど、今月の私の履歴書がグリーンスパンだった。一回目を読むと、 周りがマクロ経済オンリーな中、超ミクロ指向。 経済に関わることなら技術書でも読破（鉄鋼の圧迫技術って…） と、「どこのHackerで…