2007-09-01から1ヶ月間の記事一覧

periodic daily

AM 3:00 に FreeBSD マシンの periodic daily が走り出してディスクがガリガリ言う音を聞くと、もう寝ようかなと思う。おやすみなさい。

perl.vim で package ファイルを開く

ctagsのPerl拡張サポートがすこぶる素晴らしすぎる件 を見て思ったんだけど、package ファイルにジャンプしたいだけなら、perl.vim 使う方が簡単じゃないの?vim7.x だと標準添付じゃなかったっけ。 perl.vim を使えば package 名の下にカーソルがある状態で…

lvalue can’t set data with Devel::DProf

#!/usr/local/bin/perl my $hogedata = 'init'; hoge() = 'hogehoge'; printf "%s\n", hoge(); sub hoge : lvalue { $hogedata; } というスクリプトは Linux% perl -v This is perl, v5.8.8 built for i486-linux-gnu-thread-multi FreeBSD% perl -v This is…

IO::Socket に lvalue アクセサを追加する

package MySocket; use strict; use warnings; use base qw( IO::Socket::INET ); use Scalar::Util qw( refaddr ); { my $data_ref = {}; my @functions = qw( hogehoge1 hogehoge2 ); no strict 'refs'; # copy routines into IO::Socket for my $f (@func…