貴方がまだ使っていないだろうTest::Moreの5つの特色 | taro-nishinoの日記 | スラド
以前にも書きましたが、私もCPAN Testersの下辺の最下位に参加しています。いろいろなテストの中身を覗くと、まだ新しいTest::Moreの特色がすべて使われているとは言えないと感じました。 Test::Moreを使うのはCPAN作者のみならず、Perlerなら必須の道具です。ですから、最低常識に位置します。そういう時に、David Golden氏は御自分も失念していたかのようにとぼけて、エッセイという形を取りながらも、こじんまりと綺麗に新しいTest::Moreの特色を"Five Test::More features you might not be using yet"で説明してくれています。 私は以前にも書いたことがありましたが、Perl本体やCPANモジュールのドキュメントやハウツーものは一切訳さないと公言しました。その理由は訳さなければならないほどの英語ではない(せいぜい
Home - Japanized Perl Resources Project
プロジェクト概要 Japanized Perl Resources Project (略称: JPRP) は、Perlの日本語リソースを収集するとともに、新たな文書を翻訳するプロジェクトです。 話し合いはperldocjp-jprpメーリングリストにて行われています。 参加するには？ ...... perldocjp への参加の仕方について。 メーリングリスト ...... 各種メーリングリストについての説明。 翻訳の入手 ...... 翻訳の入手方法。CVSでの取得など。 イベント ...... 講演、オフラインミーティングなどの情報。 FAQ ...... perldoc.jpのFAQ集。 リンク ...... 関連リンク。 OSDN site ...... OSDN のプロジェクトページ。 翻訳へのリンク 本体 (コアドキュメント) 関数 モジュール
Perlでマルチプロセスデーモンを作るためのモジュール「Parallel::Prefork」に(Min|Max)SpareServers対応を追加した話 (もしくは read(2) / write(2) の atomicity) - kazuhoのメモ置き場
Perl で複数のワーカープロセスを制御するためのモジュールとしては Parallel::ForkManager が古参なんだけど、このモジュールはプロセスを fork するだけで、シグナルを受信したらワーカープロセスを再起動とかそういうことができないので、自分は Parallel::Prefork というモジュールを自作して、たとえば Plack の Server::Standalone::Prefork とかで使っています。 で、まあ、prefork なサーバとか書いてると、(Min|Max)SpareServers 対応してないんすか？ というのは FAQ なわけで。プロのサーバ管理者の間では存在価値が疑問視されて久しい (Min|Max)SpareServers だと思うんですが、まあ書いてみるのもいいかと思って Parallel::Prefork のディストリビューションに Pa
livedoor Techブログ : 変な CAPTCHA だっていいじゃないか にほんじんだもの
こんにちは。開発のシニアスペシャリストをやっております、通称「にぽたん」こと谷口公一です。 私たちが日頃使っているネット上のサービスで、web 上のフォームの最後等に「ここに書かれている文字を入力してください」のように、絵に描かれた文字を目で読み取って入力するよう求められる場合があります。 言うまでもありませんが、これは通称「キャプチャ (CAPTCHA)」と呼ばれているもので、画像データは、人間ならそれを肉眼で認識して入力が行なえますが、機械には少し難しくなるため、フォームに文字を入力しているのが、機械ではないことを判定するためにこういう仕組みが存在します。 世の中にある CAPTCHA は、やたらと字がグチャグチャで読み取るのが非常に困難なケースもあります。 これは当然、安易に、白地に黒い文字を書いたような単純な画像を CAPTCHA に用いれば、それを解読するシステムは簡単に開発出来
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 最速伝説k - Yokohama.pm Teck Talk #1
と言う事で、連結する変数が多くなると途中から join が最速になる。"$a$b$c" のような形式は最適化されて $a . $b . $c となるようだがやはり数に関わらず最も遅いので使わない。 続・スカラーの文字連結 http://www.ibm.com/developerworks/jp/linux/library/l-optperl/ より 他にも色々拡張してみた。 #!/usr/bin/perl use strict; use warnings; use Benchmark qw(:all); my $limit = 100; my $sets = { concat1 => sub { my $string = 'abcdefghijklmnopqrstuvwxyz'; my $concat = ''; for (1..$limit) { $concat .= $string;
Moose
Moose はなにではないか Moose Is Not 実験やプロトタイプ (experimental) おもちゃ (toy) もう一つのアクセサビルダー (accessor builder) ソースフィルタ (source filter) 黒魔術 (black magic) Perl 6 in Perl 5 Mooseとはなにか Moose Is Perlのための完全にモダンなオブジェクトフレームワーク A complete modern object framework for Perl Mooseとはなにか Moose Is Class::MOPのためのシンタックスシュガー (Syntactic sugar) 祖先たち (ancestry) CLOS (Common Lisp Object System) Smalltalk Alces latifrons Perl 6 … 安定して
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
I, newbie » Mooseによるオブジェクト指向Perl
Mooseは”an extension of the Perl 5 object system”だそうで、なんかすごいらしい。使ってみるとattributeやaccessorの追加も簡単で、型の確認も自動でやってくれてrobustなclassを作るのに便利。attributeがarrayやhashのreferenceだったら、contextに応じて自動的にdereferenceしてくれるとか、extendやoverrideがやりやすいとか、他にもいろいろあるらしい。Mooseは自動的にhash-basedのobjectを作ってくれる。methodを追加する方法も古典的なPerl5のOOPと同じ。 package Foo; use strict; use warnings; use Moose; sub say { my ($self, $str) = @_; print "$str\n";
CPANモジュールのアンインストール - holidays-l開発ブログ
エントリの続きはこちら→CPANモジュールのアンインストール（改良版） - ヒルズで働く@robarioの技ログ あるCPANモジュール（以下ディストリビューションと呼びます）をアンインストールしてみます。 まずは色々紹介しながら回りくどくやってみます。最後に簡単な方法を紹介します。 消したいディストリビューションを確認 自分が消したいディストリビューションが分からなかったら、 % perldoc -tT perllocal | grep Module # 見た目より速さ優先ならこっち % grep Module `perldoc -l perllocal` でインストール履歴が出ます。perllocal.podにはインストールしたディストリビューションの一覧が時刻と共に記録されていて「昨日インストールしたアレアレ…何だっけ？」という時には割と使えます。 モジュール名とディストリビューショ
List::Util Perl 標準の配列操作ライブラリ
Landscape トップページ | < 前の日 2004-11-13 2004-11-14 次の日 2004-11-15 > Landscape - エンジニアのメモ 2004-11-14 List::Util Perl 標準の配列操作ライブラリ 当サイト内を Google 検索できます * List::Util Perl 標準の配列操作ライブラリこの記事の直リンクURL: Permlink | この記事が属するカテゴリ: [Perl] List::Util は配列の最大値、最小値、合計値を取得したり、配列をシャッフルしたりするためのルーチンを集めたPerl モジュール。Perl 標準ではなかったが結構前からあったモジュールらしい。Perl 5.8 から標準ライブラリとして組み込まれたようだ。Scalar-List-Utils が元なのかな? 私ははっきり言って全く知らなかった。あると便
Perlにおけるtry catch - qootas.org/blog
perl の Error.pm ってまだメジャーじゃないのかな。 Perlにおけるtry catch Perlにおいてエラーなんかをトラップするための方法として、evalがあります。 http://perldoc.perl.org/functions/eval.html で、まず一つ目としてこのevalはあくまで「関数」であって、構文ではありません。具体的にいうならば、 a = 1 / 0; というものに対して、try catchをするのであれば、Javaならばこうすればいいわけです。 try{ a = 1 / 0; }catch(Exception e){ } perl についてくるモジュール Error.pm を使うとこんな感じで書けます。最後に ; が必要なのは一緒で、忘れがちなのも一緒ですがｗ。 #!/usr/bin/perl use strict; use warnings; u
Regexp-Assemble-0.38 - Assemble multiple Regular Expressions into a single RE - metacpan.org
Fix test prereqs; pod tests moved to xt (RT#122136, RT#122137) Many thanx to Karen Etheridge for these patches. Note: I (Ron) have no idea where the version 2.07 originally comes from, although I have seen it before. It was not in the very first distro I got my hands on. Anyway, I've reverted Karen's patch to 0.38 to match the current sequence of version #s. Apart from that, all these fine improve
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
GitHub - miyagawa/cpanminus: cpanminus - get, unpack, build and install modules from CPAN
今日のCPANモジュール（跡地） 目次