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
2004-11-27
はてダラのバージョンが上がった模様。これを元にはてダロもバージョンアップさせます。しばしお待ちを。 OpenSSLとCrypt::SSLeayのインストールについてはどうするのかな〜と思ったら、従来からあるページを紹介されてましたね。う〜ん、自前コンパイルもうまく行かない（OpenSSLとCrypt::SSLeayの間のメモリアライメントかなにかのせいらしい）ので、こっちもそれでいいか。 実は、http://theoryx5.uwinnipeg.ca/ppms/Crypt-SSLeay.ppdでppmを使ってCrypt::SSLeayをインストールする場合にはOpenSSLの別途インストールは必要ありません。何故かというと、Crypt::SSLeayで走るスクリプト中でOpenSSLも一緒にインストールすることが出来るから。 ただ、少し注意することが。 Crypt::SSLeayのインスト
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
perl - Class::Builtin 0.01 released - perlでもメソッドチェインを! : 404 Blog Not Found
2009年06月21日19:00 カテゴリLightweight Languages perl - Class::Builtin 0.01 released - perlでもメソッドチェインを! リハビリをかねて作りました。 /lang/perl/Class-Builtin/trunk - CodeRepos::Share - Trac dankogai's p5-class-builtin at master - GitHub @CPAN (coming soon)こういうことが出来ます。 #!/usr/bin/perl -l use strict; use warnings; use Class::Builtin; binmode STDOUT, ':utf8'; my $so = OO('小飼弾'); print $so->length; print $so->decode_utf8
perl - Attribute::Constant - Another Way to Make Read-only Variables : 404 Blog Not Found
2008年06月28日05:00 カテゴリLightweight Languages perl - Attribute::Constant - Another Way to Make Read-only Variables Constに物言いがついたので、ちょっと趣向を変えて。 /lang/perl/Attribute-Constant/trunk - CodeRepos::Share - Trac @CPAN (coming soon) dlock()をData::Lockとして分離し、それを使ってAttributeでRead-onlyを実現しています。 Source かのごとく短し。lvalueと三項演算子で遊んでます。Pure Perlです。PODはsignatureの後。 Data::Lock package Data::Lock; use 5.008001; use warnin
Perlにおける定数宣言(constant or Readonly or Attribute::Constant) - Unknown::Programming
正直言いますと、個人的には定数って殆ど使わないんですよね。 昔はちょこちょこ使ってたんですが、最近は定数となりうる物は基本的にYAML等外部ファイルに持たせて変更可能にすることが多いのでまったく使ってません。 ですがそれでもPerlで定数を使いたい時にはどーすんの？っていう時のために軽くここにまとめておきます。 言わずもかなPerl5.8にはconstantという定数を定義できる標準モジュールがあります。 use strict; use constant PI => 3.14; # 表示 print PI; # 3.14 # 上書きしようとすると・・・ PI = 3; # Can't modify constant item in scalar assignment とこのように上書きしようとするとエラーを吐いて死にます。 しかも実行時ではなく、コンパイル時にエラーを吐きます。 実はこのc
ついに出た！最新Perlフレームワーク「Ark」徹底解剖：第1回 Arkって何だ？ -Ark が生まれるまで｜gihyo.jp ... 技術評論社
はじめまして。面白法人カヤックの村瀬と申します。ArkというWebアプリケーション作成用のフレームワークを開発しました。今回から4回にわたって、このリリースしたばかりの「Ark」について紹介させていただきます。 Ark（アーク）とは Arkは、Perlで作られたWebアプリケーションフレームワーク（WAF）です。 Arkの特徴としては Catalystに似たインターフェース CGI／FCGI／mod_perlなどさまざまな環境で実用的に動作する CGI用モードの存在 日本製であり、日本語ドキュメントが充実している などが挙げられます。 Catalystに似たインターフェース Catalystは、Arkと同様にPerl製のWebアプリケーションフレームワークで、現在、Perlのフレームワークでは標準となりつつあるものです。 Arkは開発動機の1つが「CGIでも実用的に動作するCatalyst
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
Test::LatestPrereqs 0.01 - Charsbar::Note
管理しているモジュール／アプリケーションが増えてくると、なにかの理由（バグを見つけたとか新しい機能が追加されたとか）で依存モジュールのバージョンをあげようと思ったとき、「ほかにこのモジュールに依存しているものはなかったっけ？」と首をかしげることが増えてきます。そんなときのために簡単なテストを用意するのがこのモジュール。 インストールするとtest_prereqs_versionという非常にタイプしづらいコマンドがついてくるので、Makefile.PL/Build.PLがあるところで実行してやると、こんな感じでPREREQ_PMやらrequiresやらの情報をまるっと解析してバージョンチェックしてくれます。 C:\github\test-latestprereqs> test_prereqs_version 1..6 ok 1 - Test::More 0.47 is ok ok 2 - F
YappoLogs: HTTP::Engine is moved to GitHub
HTTP::Engine is moved to GitHub こんにちわ！gitがむづかしすぎてgitなんか滅んでしまえば良いのにと思ってる金曜日の天使ことyappoです。 表題の通り HTTP::Engine 関連のプロジェクトを github に引っ越しました。 http://github.com/http-engine http://twitter.com/httpengine http-engineアカウントを取ってそっちで管理する感じです。 必要な方にはコラボレータ追加したりとか良い感じで運用しようと思います。 なおHTTP::Engine 0.1.8 をshipitしました。 Any::Moose 0.08 での変更の追随や http://example.com/?aco=tie でリクエストたときに $req->uri の中身が http://example.com?aco
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
Mojoを使ってみた - Charsbar::Note
ちょろっと使ってみたのでレポートしてみる。 MojoというのはCatalystの原作者sriことSebastian Riedelが最近つくっている「ウェブアプリケーションフレームワークの土台をつくる」フレームワークのこと。本人いわく「rubyにおけるrack、pythonにおけるwsgiに相当するもの」だそうですが、その評価の是非はさておき、大きな特徴をいくつかあげると、 インストールはきわめて簡単 「やってみたかったから」再発明 RFC大好き コンテキスト持ち歩き系 というところでしょうか。国内では同じような趣旨のHTTP::Engineが開発されていますが、Mooseをバリバリ使っているHTTP::Engineに比べて、Mojoはアクセサからなにから、ほとんどのコードを自分で再実装しているので、インストールに困るような依存モジュールは（ほとんど）なし。ぶっちゃけ「さくらのレンタルサーバ
perl html パース ★★ HTML::TreeBuilder これだけ覚えりゃ、とりあえずＯＫ（？）
HTML を解析するには HTML::TreeBuilder が便利なんだけど、なかなか初心者向けのドキュメントが見つけられなかったので、自分用の覚え書きの意味も含めて、まとめておこうと思います。 とりあえずこんな HTMLファイル(sample.html) を処理してみましょう。 <html> <head> <title>sample.html</title> </head> <body> <div class="entry"> <div class="entry_head"> <h1><a href="http://www.hoge.jp/" id="link">www.hoge.jp</a> is fugafuga</h1> </div> <div class="entry_body"> hogehoge-fugafuga-hogehoge-fugafuga </div> </di
Blog::Trapple::Net: HTML::Elementの罠
HTML::TreeBuilderなんかを使うと帰ってくるHTML::Element。 なんかメモリーリークしてる・・・と前から思ってたんだけど、やっとわかりました。 このオブジェクトは、内部で循環参照してるので、Destroy時に明示的に$obj->deleteしないとリークの原因になるみたいです。 なんてことはPerldocにしっかりかいてあるわけで・・・ほんと英語が出来ないと不利だなぁ・・・； http://search.cpan.org/~petek/HTML-Tree-3.23/lib/HTML/Element.pm#%24h-%3Edelete() CGIなら気にもならないけど、mod_perlや大型クロールプログラムだと致命的。 気をつけないとっ。
perl - Encode 中級 : 404 Blog Not Found
2008年05月08日04:00 カテゴリLightweight Languages perl - Encode 中級 以前書いた 404 Blog Not Found:perl - Encode 入門 は大好評でしたが、 ウェブで利用される文字コード、UnicodeがASCIIを上回る--グーグルが明らかに:マーケティング - CNET Japan UnicodeがASCIIを追い越し、World Wide Web上で最も多く利用されている文字コード体系になったとGoogleのシニアインターナショナルソフトウェアアーキテクトMark Davis氏がブログで述べている。 という時代に完全対応するには、入門以上の知識がちょっと必要になります。 例えば、本blogをホストしてくれているlivedoor blogの文字コードはEUC-JP。「時代はUnicode」だと言っても、こうした事情もまだ
汎用的なXMLSocketサーバを書いた - download_takeshi’s diary
FlashのXMLSocketサーバ「Hoppy」をリリースしました。 Hoppy - Flash XMLSocket Server http://github.com/miki/Hoppy/tree/master githubにあげてあります。そのうちCPANにも反映されると思います。 HoppyはFlashのXMLSocketサーバのperl実装です。いわゆるプッシュ型のwebアプリケーションを簡単に実装することを目標としたTCPサーバです。 内部はperlのPOEによるイベントドリブンな実装なので、POEの知識がある方であれば、かなり柔軟にサーバの振る舞い自体を変更したり拡張したりすることができます。逆にPOEを知らない人でも、いくつかの決めごとに従うだけで、簡単に機能を搭載していく事ができます。 基本的な決めごと Hoppyはある程度の「決めごと」を前提とした、汎用的で拡張可能なX
YappoLogs: TokyoCabinetがPerlのHASHより遅いわけがない！
TokyoCabinetがPerlのHASHより遅いわけがない！ こんにちわ！金曜日担当・Shibuya内フェアリーことYappoです。 mixi Engineers’ Blog » PerlとRubyで省メモリなハッシュを使おうにて 100万件のレコードを格納した場合のメモリ使用量と処理時間を測ってみましょう。Perl（5.8.8）でテストコードを動かしたところ、以下の改善が確認できました。標準のハッシュに比べて、メモリ使用量がTCのオンメモリハッシュだと約61%、TCのオンメモリツリーだと約37%になることがわかります。処理時間に関しては157%ほどになっていますが、まあ許容範囲ですよね。といった事が書かれており、その文面の上の解説で、tieしたので、tieしてるからおせーんじゃねーの？とテストコードも見ないで呟いてたらmikioさんからtie使わないでやってるよ！とつっこんでいただき
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
ドメインパーキング
local::libうっかり - D-6 [相変わらず根無し]