SEARCHES

SEARCHES

【Perl】fpingをPerlで実装してみる(その1)
AnyEventという、非同期のイベント駆動プログラミングができるCPANモジュールがあります。Perl界隈ではもう何年も前からよく話題に上っていたのですが、私はこれまで全く使った事がなかったので、練習がてらこのモジュー […]

【Perl】標準モジュールツールキットを作ろう(ただしソースフィルタなしで)
Perl Advent Calendar 2012を読み漁っていたところ、Syntax::Collectorというモジュールが紹介されていたので、試しに少し使ってみました。以下、簡単にご紹介します。 Perlでいくつかの […]

【Perl】”サブクラスをインスタンス化するメソッド”を動的に追加する方法を考える(その2)
前回のコード例では、インスタンス化できるサブクラス名に制約がありました。今回は、その制約を受けずに済むよう、前回のコードを改造してみたいと思います。 改造後のメインクラスは以下のとおりです。なお、改造前のコードにあったs […]

【Perl】”サブクラスをインスタンス化するメソッド”を動的に追加する方法を考える
CatalystやDBIx::Classなどのように、 [crayon-693d3af2cf58c369007283/] こんな感じで、あらかじめサブクラスをuseしなくとも、必要になった時に動的にサブクラスをuseして […]

【Perl】MooseX::Declareで、Mooseをより手軽に
Mooseでは、オブジェクトのプロパティ(Mooseではアトリビュートといいます)の型チェックは簡単に記述することができるのですが、一方でメソッドの引数については、従来のPerlサブルーチンの実装と同じため、自前でバリデ […]

【Hinemos/Perl】性能管理データをWeb上で見る
タイトルについて、ふと「Web上で見られたらいいなぁ」と思い立ち、試しに作ってみました。 もちろん汎用的なものではなく、実用にはほど遠いのですが、最近のWeb技術を使ってどれだけ簡単に作れるか確認したかった、というのも理 […]

【Hinemos】”カスタム監視”を使用してuptimeを監視する
2.4系以前のカーネルを搭載したLinuxやWindows(クライアントOS、サーバOS問わず)などは、システム起動から約497日を経過すると、様々なシステム上の問題が発生すると言われています。いわゆる「497日問題」で […]

【Perl】 続・Log::Dispatchで、TCP経由でsyslogを送信する際の注意点
以前ご紹介した内容について、Sys::Syslogの最近のアップデートにより、setlogsockサブルーチンへの引数にポート番号を渡した場合には、getservbyname関数を使わず、渡されたポート番号を使用するよう […]

【Perl】 Log::Dispatchで、TCP経由でsyslogを送信する際の注意点
少し前に、TCP経由でsyslogメッセージを送信するプログラムを作成する必要があり、Perlでそれを作成したのですが、その時にちょっとした罠に引っかかってしまったので、備忘録の意味合いも込めてご紹介したいと思います。 […]

【Vim】 マークとレジスター
マークとレジスターは、Vimでのテキスト編集をより効率的に行うために、是非とも憶えておきたい機能です。 1. マーク マークは文字どおり、ファイル中の任意の場所に(見えない)印を付ける機能です。いったん付けた印は、ファイ […]