タグ

Perlに関するsharaku3eyesのブックマーク (156)

  • Jラボ» Nagiosプラグイン開発ガイドライン – Jラボ

    Nagiosプラグインとは、Nagiosが監視を行い、監視データを収集するために必要なプログラムのことだ。 今回は、このNagiosプラグインを自作しようというお話。 以前、SoftwareDesignでも『ネットワーク監視ツールNagiosのコードを読む』(2007年3月号~2009年2月号)というNagiosプラグインを扱った2年にも及ぶすばらしい連載があった。 この時期は毎月楽しみに読んでいたものだ。 そういう話はさておき、まぁ、何が言いたいのかといえば、Nagiosプラグインは簡単に作れますよということだ。 結論から言うと、最低限以下の条件を満たしていれば良い。 1.監視結果を80文字以内でSTDOUTに出力すること 2.監視結果を戻り値(0、1、2、3のいずれか)で返すこと Nagiosプラグインが簡単か、難しいかは、そのプラグインがどんなことをするか(監視の処理内容)によるとい

    Jラボ» Nagiosプラグイン開発ガイドライン – Jラボ
  • プレゼンをmarkdownで書いたらええやん

    markdown2impressってのを書きました。 https://github.com/yoshiki/markdown2impress これはmarkdownで書いた文章をimpress.jsに対応したHTMLに変換するものです。impress.jsっていうのは、CSS3をつかって文字とかをぎゅんぎゅん動かすことのできるプレゼンフレームワークです(prezi.comにインスパイアされて作ったらしい)。 impress.jsを使ってプレゼンをゼロから作ってもいいんですが、HTMLをいちいち書くのめんどかったのでmarkdown形式で書いたものをそれ用に変換してくれたらいいなと思って書いてみました。基的にはmarkdownで書いた文章の1つのセクションが1つのスライドになるようになっていて、githubのリポジトリのREADME.mdをこのプログラムで変換するとプレゼンに変換されます。

  • Read the Latest CI CD News

    Introduction Measuring and improving the productivity of DevOps teams has long been a major challenge. From purely technical metrics to more business-oriented ones, the choice of metrics often remains a… Among all the tools aimed at orchestrating containers, the two leading players are Docker Swarm and Kubernetes. Both provide solutions for container application management, as well as container ap

    Read the Latest CI CD News
  • perlモジュールのinstallにcpanmを使う - Perl - @OMAKASE

    当サイトのblogのエントリーで検索ワードが多いのはCPANなんですがこの古い記事はperl5.6時代に書いた記事(多分10年近く前だと思う)で今時のperl使いにお勧めできるものではありません。 2010年2月にあの miyagawa さんが書いた cpanminus が非常に素晴らしいので CPAN::shell を捨てて App-cpanminus を積極的に利用しましょう。 と言うことでcpanに関連して新しい記事を書いてみました。 CPAN::shell の欠点 設定が面倒 動作が遅い(cpanmと比較して) 多くのメモリが必要(制約のきついレンタルサーバで使うのは無理) 依存するモジュールが多い 基root権限が必要 cpanm の利点 一枚岩のプログラムで可搬性に優れる 高速で小メモリでも動作可能 pluginで拡張できる local::lib と組み合わせるとユーザーラン

  • Scripting Layer for Android で Perl x Android - naoyaのはてなダイアリー

    Shibuya Perl Mongers テクニカルトーク#14 に行ってきました。諸々面白かったですがパネルディスカッション、LT ともに id:kazuhooku さんの発表が良かったですね。 さて、Scripting Layer for Android (SL4A) を使って、PerlAndroid を hack する話をしてきました。SL4A は jRuby、PerlPythonPHP などの言語を Android で使えるようにするアプリ。それぞれの言語からは AndroidFacade API と呼ばれる API で、AndroidUIやカメラを操作できるというものです。 発表資料は以下です。 Scripting Layer for Android + Perl (SlideShare) http://www.slideshare.net/naoya1977/sc

    Scripting Layer for Android で Perl x Android - naoyaのはてなダイアリー
  • はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知

    はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28

    はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
  • MEDIASでperlプログラミング - file-glob こと k.daibaの日記

    はじめに 今iPhone 3Gを使っているんですが,docomoのMEDIASを使うことになりました.元々別の機種に変えようとは思っていたんですが,訳あって2台持ちとなっています.そのうちiPhoneは解約しますけど.んで,せっかくAndroid機を手に入れたのでsl4aを入れてperlでプログラミングしようと思い立ちました.この記事はサンプルスクリプトを動かすまでについて書いています. Macからのadb sl4aを使うだけなのでAndroid SDKをすべてインストールする必要はありません.adbがあればいいだけなのですが,ここではまりました.Macからusbを使ってadbでMEDIASを制御するにはMEDIASのベンダIDが必要で,これを~/.android/adb_usb.iniに記載しておく必要があったのです.ちなみに,adb_usb.iniファイルは $ android upd

    MEDIASでperlプログラミング - file-glob こと k.daibaの日記
  • Big Sky :: Plaggerで「Perler in Japan」なOPMLを作った

    Perlerと呼ばれる程のスキルは無いのですが... Perlプログラマーの皆さん - Perl入門~サンプルコードによるPerl入門~ Perlをやっている人のブログをRSSリーダーに登録しておくと最新の事情がわかったりします。 http://d.hatena.ne.jp/perlcodesample/20081217/1229522517 Plaggerで上記リンクからOPML作るYAML書きました。 perler-in-japan.yaml plugins: - module: Subscription::XPath config: url: http://d.hatena.ne.jp/perlcodesample/20081217/1229522517 xpath: //div[@class="body"]/div[@class="section"]/blockquote/p/a

    Big Sky :: Plaggerで「Perler in Japan」なOPMLを作った
    sharaku3eyes
    sharaku3eyes 2009/01/11
    重複したフィードを整理する(by malaさん)と併用
  • Perlゼミ(サンプルコードPerl入門)

    Perl入学式 全6回のPerl入門講座。東京、大阪、沖縄、札幌で開催。(東京は4月と10月スタート、それ以外は5月スタート) YAPC::Japan Perlを軸としたITに関わる全ての人のためのカンファレンス。 東京 吉祥寺.pm 五反田.pm 大阪 なにわPerl 沖縄 沖縄.pm

  • Big Sky :: ニコニコ動画をダウンロード出来るPerlモジュールWWW::NicoVideo::Downloadを試してみた。

    miyagawaさんがPlaggerのFetchNicoVideoからダウンローダとして抜き出してくれました。 Tatsuhiko Miyagawa / WWW-NicoVideo-Download-0.01 - search.cpan.org http://search.cpan.org/~miyagawa/WWW-NicoVideo-Download-0.01/ 中身はMooseを使ったモダンなコード。eg/fetch-video.plにそのまま使えそうなサンプルまで入っています。 サンプルではTerm::ProgressBarで進捗表示までされて至れり尽くせり。今日はちょっとだけ修正してファイル名をタイトルから名付ける様にしてみました。 といってもWWW::NicoVideo::Downloadではloginが単体で呼び出せられる様になっていますし、user_agentが得られるよう

    Big Sky :: ニコニコ動画をダウンロード出来るPerlモジュールWWW::NicoVideo::Downloadを試してみた。
  • Perl スクリプトで遅い場所を特定する方法 - Devel::Profiler / Devel::NYTProf

    仕事で書いてる Sledge アプリがあるのですが、先日負荷テストを行った結果びっくりすることに現行アプリの10倍遅いことが判明してしまいました・・・orz Sledge フレームワーク自身が重くないことは今までの経験でわかってるのですが、どうにもソースを見直しているだけでは原因が特定できない・・・そんな活躍するのがプロファイラです。プロファイラの御陰で遅いヶ所を特定することができ、無事に想定するパフォーマンスを得ることができました。この内容に関してはまた別エントリにて。 さて、プロファイラを使うとプログラム実行時の各種情報を収集し、性能解析を行うことが可能です。プロファイラについてもう少し詳しくしるには 性能解析 - Wikipedia あたりを読むと良いでしょう。 プロファイラ(英: Profiler)は性能解析ツールであり、プログラム実行時の各種情報を収集する。特に、関数呼び出しの

  • Moose - Perl5のためのまったく現代的なオブジェクトシステム

    NAME SYNOPSIS CAVEAT DESCRIPTION 別のオブジェクトシステム!?!? これを製品に使えますか?それとも実験段階でしかありませんか? MooseはPerl 5におけるPerl 6に過ぎませんか? BUILDING CLASSES WITH MOOSE EXPORTED FUNCTIONS UNEXPORTING FUNCTIONS unimport MISC. What does Moose stand for?? CAVEATS ACKNOWLEDGEMENTS SEE ALSO BUGS AUTHOR COPYRIGHT AND LICENSE DOCUMENT TRANSLATION Page Top NAME Moose - Perl5のためのまったく現代的なオブジェクトシステム Page Top SYNOPSIS package Point; use

  • [http://search.cpan.org/perldoc?Web::Scraper:title=Web::Scraper] をつかってみた - daily dayflower

    ドキュメントねー,と思ったら Redirecting… みたいな素敵なチュートリアルがあったのでいまさらながら使えるようになりました。サンプル群も参考になりました。 はてブのホッテントリから,タイトル,URL,キーワード,タグを抜き出すのを書いてみました。わりと素直に書くとこんな感じ? use strict; use warnings; use Web::Scraper; use Encode (); #binmode \*STDOUT, ':utf8'; my $utf8 = Encode::find_encoding('utf8'); my $target = do { if (@ARGV && ! -f $ARGV[0]) { use URI; URI->new($ARGV[0]); } else { local $_ = do { local $/; <> }; $utf8->de

    [http://search.cpan.org/perldoc?Web::Scraper:title=Web::Scraper] をつかってみた - daily dayflower
  • tokuhirom blog

    Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at

    sharaku3eyes
    sharaku3eyes 2008/06/08
    syntaxErrorつぶし
  • tokuhirom blog

    Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at

    sharaku3eyes
    sharaku3eyes 2008/06/08
    cpan使い、わからん事はIRCで先輩PerlMongersに聞く
  • 第1回 Perlにおけるテストの概要/TAPとは? | gihyo.jp

    モバイルファクトリーの松野です。 今回から数回にわたって、Perl におけるテスト手法についてリレー形式で詳細に解説していきたいとおもいます。 今回は初回ですので、ざっくりと概論になります。 Perlの世界におけるテストの重要性 Perlの世界においてはテスト(test)は大変重要視されています。 その特徴がよく表れているのがCPAN Testersではないでしょうか。 CPAN Testers Perlといえば何はなくともCPANなわけですが、CPANでモジュールを探していると、図1のように、「⁠CPAN Testers」という項目があることに気付きます。 図1 CPAN Testers 世界中のPerl Mongersが、自分のマシンでテストを動かして、その結果をCPANに送っているのです。これにより、様々なOS/CPU/versionのPerlでテストがされています。貴方も気軽にCP

    第1回 Perlにおけるテストの概要/TAPとは? | gihyo.jp
  • メール受信時に perl スクリプトを起動して自動処理させる方法 | perl/CGI | 阿部辰也のブログ――人生はひまつぶし。

    メールが届くと同時に何らかのアクションを起こすプログラムというのは、かなり作る機会の多い部類に入るかと思います。 ここ数年で特に多いものだと、ケータイ向けサイトの案件で、空メールを受信したら自動でユーザー登録用のフォームのアドレスを書いたメールを、空メール送信者に送る、みたいなものとか、ブログやSNSの日記なんかを、ケータイメールで投稿できるようにする処理とかですね。 そして王道の自動返信メールとか。 後、途中で飽きちゃったんですが、昔、送られてくるメールの内容を自分で学習して言葉を覚えて、文章を生成して返信する bot (人工無脳)を趣味で作ってたことがあります。 で、実際こういう「メールを受け取ったら何らかの処理を自動で行なう」という機能を実現するには、どうすれば良いかというと、 特定のメールアカウントにメールが届いた際に、何らかのプログラムが起動するように設定する そのプログラムを書

  • http://www.cpa-lab.com/tech/0143

    sharaku3eyes
    sharaku3eyes 2008/05/30
    メールからスクリプトファイルを起動
  • 簡単CGI: 曜日 ~Zeller(ツェラー)の公式~

    ■ 曜日 ~Zeller(ツェラー)の公式~ 曜日ってどうやって求めるの?と思った方もいらっしゃると思いますが、 実は、求めるための公式があるのです。「Zeller(ツェラー)の公式」といいます。 これで、1582年10月15日(金)以降のある日付の曜日を求めることができます。 年 + 年/4 - 年/100 + 年/400 + (13*月+8)/5 + 日 を7で割ったときのあまりが、 0ならば日曜、1ならば月曜・・・6ならば土曜になります。 (ただし、1月、2月は前年の13月、14月として計算することになっています。) これを、Perlの式で表すとこうなります。 ($year + int($year/4) - int($year/100) + int($year/400) + int((13*$month + 8)/5) + $day) %7 簡単なサンプルを見てみましょう。 <サンプ

    sharaku3eyes
    sharaku3eyes 2008/05/27
    日付から計算で曜日を求める
  • 簡単CGI: Perl Tips

    XREA.COMでのCGI設置方法の説明、Perlに関するTipsなど。

    sharaku3eyes
    sharaku3eyes 2008/05/27
    的が絞られてる、かなり解説が短くポイントのみ、サンプルコードもけっこうある