キーワード検索｜株式会社アトミテック

2013.02.09

【Hinemos】ログインパスワードを強制的に変更する

A社のサーバ運用担当者が、ある日Hinemosへログインしようとしたところ、ログインパスワードが変更されていてログインできないことに気づきました。関係者へ問い合わせたところ、どうやら昨日システム管理者がパスワードを変更し […]

2013.02.03

【Perl】fpingをPerlで実装してみる(その1)

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

2012.12.24

【Perl】標準モジュールツールキットを作ろう(ただしソースフィルタなしで)

Perl Advent Calendar 2012を読み漁っていたところ、Syntax::Collectorというモジュールが紹介されていたので、試しに少し使ってみました。以下、簡単にご紹介します。 Perlでいくつかの […]

2012.12.03

【Perl】”サブクラスをインスタンス化するメソッド”を動的に追加する方法を考える(その2)

前回のコード例では、インスタンス化できるサブクラス名に制約がありました。今回は、その制約を受けずに済むよう、前回のコードを改造してみたいと思います。改造後のメインクラスは以下のとおりです。なお、改造前のコードにあったs […]

2012.11.26

【Perl】”サブクラスをインスタンス化するメソッド”を動的に追加する方法を考える

CatalystやDBIx::Classなどのように、 [crayon-68b4a9497a649497660078/] こんな感じで、あらかじめサブクラスをuseしなくとも、必要になった時に動的にサブクラスをuseして […]

2012.11.12

【Perl】MooseX::Declareで、Mooseをより手軽に

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

2012.10.06

【Hinemos/Perl】性能管理データをWeb上で見る

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

2012.09.09

【Hinemos】”カスタム監視”を使用してuptimeを監視する

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

2012.08.19

【Perl】続・Log::Dispatchで、TCP経由でsyslogを送信する際の注意点

以前ご紹介した内容について、Sys::Syslogの最近のアップデートにより、setlogsockサブルーチンへの引数にポート番号を渡した場合には、getservbyname関数を使わず、渡されたポート番号を使用するよう […]

2012.07.07

【Perl】 Log::Dispatchで、TCP経由でsyslogを送信する際の注意点

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

キーワード検索