The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending. use strict; use warnings; package pQuery; our $VERSION = '0.24'; use pQuery::DOM; use Carp; use HTML::TreeBuilder(); use base 'Exporter'; our $document; *pQuery = \$document; our @EXPORT = qw(pQuery $pQuery PQUERY); my $my = {}; my $lwp_user_agent; my $quick
Everybody knows about Exporter.pm: you use it, and if someone uses your module, they don't have to type quite as much. We'll look at how the Exporter works, and how it fails to take advantage of the powerful concepts on which it's built. We'll see how you can provide flexible import routines that allow your module's user to type even less and get code that behaves much more like part of his own pr
NAME Method::Cached - The return value of the method is cached to your storage SYNOPSIS package Foo; use Method::Cached; sub cached :Cached { time . rand } sub no_cached { time . rand } package main; my $test1 = { cached => Foo->cached, no_cached => Foo->no_cached }; sleep 1; # It is preferable that time passes in this test my $test2 = { cached => Foo->cached, no_cached => Foo->no_cached }; is $te
NAME Tree::BPTree - Perl implementation of B+ trees SYNOPSIS use Tree::BPTree; # These arguments are actually the defaults my $tree = new Tree::BPTree( -n => 3, -unique => 0, -keycmp => sub { $_[0] cmp $_[1] }, -valuecmp => sub { $_[0] <=> $_[1] }, ); # index the entries in this string: my $string = "THERE'S MORE THAN ONE WAY TO DO IT"; # TMTOWTDI my $i = 0; $tree->insert($_, $i++) foreach (split
Post to Twitter Post: Perl In Japan From: hanekomu, 4 months ago Perl In JapanView SlideShare presentation or Upload your own. (tags: hackers mongers) Wherein I am recounting my impressions about the japanese Perl community as gleaned in a recent visit to Tokyo and YAPC::Asia 2008. SlideShare Link close Perl In Japan Wherein I am recounting my impressions about the japanese Perl com
いささか遅くなりましたが予告通り完全版の一覧を掲載します。このデータは基本的にYAPC直前、2008年5月15日時点でのものですが、抜けが判明したworemacxさんの分については先ほど目視で抽出しました。ほかの方のYAPC後の更新については反映されていませんのであしからずご了承ください。 ちなみに過去の選手権の結果はnipotanさんのサイトに掲載されています。 2006年度 2005年度 というわけで、あらためてなんちゃらかんちゃら出てこいや〜、とな。 モジュール数5個以上の部 過去二回の選手権ではモジュール数による分類はなかったのですが、この一覧のもとになっているCPANTSの仕組み上、モジュール登録数の少ない新しいAuthorの方が有利になる側面があるので、今回は本家CPANTSの分類にしたがってランキングを分けました。YAPC当日に発表したのはこのグループのベスト10です。表は、
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
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
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
はてなダイアリー/はてなグループのCRUDを行うモジュール、WWW::HatenaDiaryをCPANへリリースしました。 WWW::HatenaDiary id:tokuhiromさんがCodeReposで始めたものに、僕があれこれごしゃごしゃくっつけてったってな感じのものです。今後、ちょっとあれこれしてみたいと思ったりしてます。 はてなダイアラーならご存知の通り、はてなダイアリーは元々、エントリ単位というよりもむしろ、日付け単位でエントリを書き綴っていくというスタイルです。WWW::HatenaDiaryでは、そのどちらの単位でもCRUDを行えるような感じにしてみました。 使い方は、以下のような感じで。詳細については、PODをご覧ください。また、バグや改善した方がいい点等ありましたら、是非ともCodeReposでお願いします。 オブジェクト生成 & ログイン use WWW::Hate
Stevan Little stevan@iinteractive.com Vienna, Austria August 29th, 2007
やっとCPANデビューしました。こんな感じです。 登録〜公開の手順は、川崎さんのページが詳しくてわかりやすいです。以下、概要をメモ。 PAUSEへアカウント登録 PAUSEにユーザ登録申請をする 辛抱強く待つ。「Welcome new user XXXXX」 ってメールが返ってきたら登録完了*1 (やらなくてもOK) Gravatarで XXXX@cpan.org に対してアバターを設定すると写真が貼れる 実装する 型紙作成〜パッケージングに関しては竹迫さんの記事が参考になりました。 モジュールの型紙を作る。(h2xsとかmodule-starterとかpmsetupとか) t/*.t (テスト) を実装。 *.pm (実体)を実装。 $VERSIONを設定 podを書く README、ChangeLog、MANIFESTを書く (Build.PLの場合)Makefile.PLも忘れずに書
Perlで英語の自然言語処理をするときの基礎。日本語に比べると英語は機械的に処理がしやすいものの、複数形や過去形をちゃんと扱う処理を自分で書くのは面倒だし、すでにいろいろな人がモジュールを公開している(そのため、質は玉石混淆であり、こういうプレゼンテーションはありがたい)。全部インストールして試してみたが面白かった。 Lingua::EN::Conjugate 主語、動詞、時制を入力すると動詞の変化形を教えてくれる。goの過去形はなんだっけ、と思ったら $string = conjugate( verb => 'go', tense => 'past', pronoun => 'he' );とするとhe wentと出力される。 Lingua::EN::Fathom 文章の「読みやすさ」を判定する。会場ではGPLの本文(gpl.txt)を解析させ、「読みにくい」という判定が出たところで聴衆が
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く