What Makes for a Perfect OO Tutorial Example? – House Absolute(ly) Pointless
Recently I’ve been working on revising the Perl 5 core OO documentation, starting with a new OO tutorial. My first draft used Person and Employee as my example classes, where Employee is a subclass of Person. After I posted the first draft, several people objected to these particular classes. I realized that I agreed with their objections, but I wasn’t able to come up with anything better. I broug
Who Are the Perl 5 Core Docs For? – House Absolute(ly) Pointless
I’ve been spending a fair bit of time working on Perl 5 core documentation. I started by editing and reorganizing some of the documents related to core hacking. This update will be in 5.14, due to be released in April. I’m also working on replacing the existing OO tutorials and updating the OO reference docs, though this won’t make it into the 5.14 release. There’s been a lot of discussion on my O
Test::Mock::Guard Released - 日向夏特殊応援部隊
さっき nekokak さんと xaicron さんにそそのかされて Test::Mock::Guard ってモジュールを書いてみました。 そもそも Perl には Test::MockObject と言う汎用の Mock モジュールがあるんですけど、あれこれ余計な機能がたくさんついてたり Mock 化すると多分元に戻せないと言うのがあってもっとシンプルな奴がほしいなと思って作ってみた次第です。SYSNOPSIS のコピペですけど、 use Test::More; use Test::Mock::Guard qw(mock_guard); package Some::Class; sub new { bless {} => shift } sub foo { "foo" } sub bar { 1; } package main; { ### このスコープでは Mock 化されてる my
KeyedMutex::Memcached ってモジュールをリリースして何も言ってなかった件 - 日向夏特殊応援部隊
id:kazuhooku さんがかつて作った KeyedMutex を memcached でやってしまおうと言うのがこのモジュールの目的です。 KeyedMutex の場合は、keyedmutexd と言うそれ専用の daemon を立ち上げなければいけませんが、このモジュールの場合は既存のシステムに memcached があれば普通に使えます。 trial を 0 にすると timeout で lock が expire するか、誰かが lock を開放するまで延々と lock の獲得が出来るまでビジーループします。一方で trial を有限の正整数とすると、その試行回数で lock が獲得出来ない場合は即座に諦めます。 正規の使い方としては lock を獲得出来るのが同時に1クライアントのみで他はそれが開放されるまで待たせると言うのが正解ですが、ちょっと変わった使い方としては、例えば
【Oct . 13, 14, 15】YAPC::Asia Tokyo 2011 "Evolution" - Japan Perl Association運営ブログ
【Oct . 13, 14, 15】YAPC::Asia Tokyo 2011 "Evolution" のお知らせ | Announcing YAPC::Asia Tokyo 2011 "Evolution" ( English announcement follows Japanese ) こんにちは、櫛井です。 去年に引き続き、YAPC::Asiaを担当させていただくことになりました。 周到に仕組まれた罠により、気付いたらイベントをやることになった 前回とは違い、JPAの理事会に呼ばれたと思ったら 「次回のYAPC::Asiaの草案よろぴく」とカジュアルに言われたので 今年も頑張ろうと思います。皆様の協力あってのYAPC::Asiaです。 宜しくお願いいたします。 ■テーマと方向性について 今回のテーマは「Evolution」、Perlの先端を行く人をメインにすえたいと
CPANモジュールガイドという本を書きました
YAPC のLT で告知した CPANモジュールの解説本、来月発売になります！ このサイトを見てくださった出版社から執筆の声をいただいたのですが、最終的に全部で200ほどのモジュールを解説しています。ほんの数行をひねりだすのに30分ウンウンうなったり、執筆は楽しいながらも大変でした。今はHUNTERxHUNTERがなかなか進まないことに完全に賛同できます（笑） 書いている長い間、退職したり、ノロウイルスにやられたり（もう二度と生牡蠣は食べない！）、そしてこの地震、と振り返るとなんだかいろいろありました。 この本は Perl コミュニティに何か還元したいというモチベーションで書きあげました。具体的には、中級者を増やすものになればいいなと思っています。A5版の本で（たぶん）簡単に読みきれるものですが、これに書いてあることだけを使っても相当なことができますし、CPAN を使いこなすショートカット
Re:Re:Teng::Schema::DeclareにPlugin機構があったらいいのにって妄想してた - $shibayu36->blog;
Teng::Schema::DeclareにPlugin機構があったらいいのにって妄想してた - $shibayu36->blog; http://blog.nekokak.org/show?guid=AJRyCnVR4BGdRGA7MSAp_g nekokakさんに返答してもらえたので、もう一度考えなおしてみました。 Schema定義時以外に差し込む方法 なるほど、SchemaAPIがあるので、Tableオブジェクトが作られていれば、後から挿し込むことも可能ということなんですね。勉強になりました。まだちゃんと理解していないですが、動的にinflateを追加するときとかに使えるといった感じでしょうか。 ただ、いまいち今回やりたかったことを実現できるのかがわかりませんでした(自分の理解が足りないだけの可能性が大いにありますが...) やりたかったことを再確認 正直自分でも何がやりたかったのか
Re:Teng::Schema::DeclareにPlugin機構があったらいいのにって妄想してた
http://d.hatena.ne.jp/shiba_yu36/20110317/1300375840 TengではSchemaAPIがあるのでinflate/deflateをSchema定義時以外に 挿し込むことも可能です。 ちょっと長いですがサンプルスクリプト。 use strict; use warnings; use Test::More; { package Mock; use parent 'Teng'; package Mock::Schema; use Teng::Schema::Declare; table { name 'mock'; pk 'id'; columns qw/ id name /; }; package Mock::Name; use overload '""' => sub { $_[0]->as_inflate }, fallback => 1 ;
都道府県別環境放射能水準調査結果をscrapingするの法 または PDF をスクレイピングするの法 - tokuhirom's blog
http://www.mext.go.jp/a_menu/saigaijohou/syousai/1303723.htm このあたりからデータを取得できるわけだが、なぜか PDF なので、うんざりする。 こんなもんどうみても excel かなにかでつくってるんだから生データを提供しろといいたい。 まあ文句をいっていてもしょうがないので、こういう PDF をスクレイピングする方法について解説する。 pdftotext などのコマンドをつかうのがオススメ。今だと、poppler というライブラリが日本語もあつかえてすばらしすぎるので、これをつかうとよい。これは Perl/Python/Ruby のバインディングがあるので、それをつかってもよいがこういう場合、ライブラリなどでがんばって PDF を解析するのはわりと時間の無駄となる場合がおおい。 poppler は homebrew で一発インス
lib::xi - installs missing libraries on demand - Islands in the byte stream (legacy)
gistなどで公開されているPerlスクリプトを実行する際、モジュールが足りないことがよくあります。そういう場合はCan't locate Foo.pm ...というエラーメッセージを見ながらモジュールをインストールするわけですが、決まりきった作業にうんざりしたので自動的にそれをするモジュールを書きました*1。 https://github.com/gfx/p5-lib-xi `perl -Mlib::xi script.pl`とするだけで、足りないモジュールをcpanmで適当にインストールしてくれます。 -Mlib::xi=extlibとすれば既存の環境を壊すことなくlocal::lib的にextlib/にインストールして実行できますし、-Mlib::xi=-L,extlib,-qなどとしてcpanmにオプションを渡すこともできます。 これで退屈なインストール作業をしなくてすむはずです。
China Times: Taiwan's high-tech sector weakened but still solid
Sorry, there's an error on the page you wish to access.
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Fixed CPAN Testers reporting with LWP 6
The Future of Perl Documentation (part 1 of 3) | Mark A. Stratman [blogs.perl.org]
A Module::CoreList for vendor distributions | brian d foy [blogs.perl.org]
Putting Perl Back on Top in the Fields of Scientific and Financial Computing | lhermida [blogs.perl.org]
Perl Jam - A Work In Progress | Barbie [blogs.perl.org]
LWP v6.00 & Self-signed Certificates. | CPAN Testers [blogs.perl.org]
Recreating a Perl installation with MyCPAN | brian d foy [blogs.perl.org]
New Perl news site launches | Leo Lapworth [blogs.perl.org]
Perlゼミ(サンプルコードPerl入門)