Perl6、まもなく登場 | エンタープライズ | マイコミジャーナル
When you need perl, think perl.org Perlの次期メジャーバージョンとなるPerl 6のリリースがどうやら29日になるようだと複数のメディアが伝えている。ベースになっている報道はPCWorld Business Centerに掲載されたPerl Creator Hints at Imminent Perl 6 Releaseという記事。OSCONカンファレンスの"State of the Onion"講演でPerlの開発者であるLarry Wallがそうした内容を示唆したという。 2009年8月の時点では2010年4月でのPerl6登場が発表されていた。2010年4月に公開が予定されているバージョンは、Perl 6仕様のうちいくつかを実装したものになるとされており、実装が完成したバージョンではないという点をはっきりさせるため、Perl 6という名称でのリリ
Perl で時刻の文字列を生成する速い方法 - Craftworks Tech Blog - Branch
DateTime が重くて遅いのは周知ですが、一応どれくらい差が出るかベンチマーク。 「2010-07-01 15:10:53」みたいなフォーマットのタイムスタンプ文字列を生成したい場合です。 DateTime はオブジェクトをキャッシュして使い回しても相当遅いです。 POSIX はコアモジュールで、Windows でも使えますので、使える環境では積極的に使いましょう。 他にももっと速い方法があれば、教えてください。 Benchmark: running dateime, dateime_c, posix for at least 3 CPU seconds... dateime: 3 wallclock secs ( 3.15 usr + 0.00 sys = 3.15 CPU) @ 2083.17/s (n=6562) dateime_c: 3 wallclock secs ( 3.4
119行でPlack対応のWeb Application Framework を書いてみる - tokuhirom's blog
拡張性等を考慮しなければ、以下のように簡単にかくことができる。 View を XSlate きめうち。ルータは given-when で、設定ファイルは .pl という構成。だいたいのウェブアプリケーションは、これぐらいの機能の WAF で十分。ルーター部分は Router::Simple とかにさしかえた方がよいかもだけど。 5年前に Python で似たような記事をみたのだが、今はみんなのがんばりによって Perl でもおなじことができるようになった。 use strict; use warnings; use 5.10.1; package MyWAF; use parent qw/Class::Data::Inheritable/; use Path::Class; use Text::Xslate qw/mark_raw/; use Encode; use Time::Piece
Perlの商標の件について業界の友人に聞いてみた
なにこれいたい 北畠徹也氏、「Ｐｅｒｌ／パール」を手中に dankogaiー、そろそろ出番ですよー、と召喚してみるテスト。（笑） Dan, the patent not found. 先に行っておくと、Perlに関しては多分安心していい。すでに「本家」である The Perl Foundation が国際商標登録しているのだ。 商願2007-92708 (http://www1.ipdl.inpit.go.jp/syutsugan/TM_AREA_A.cgiより検索。ひどいインターフェイスだなあ) 先頭権発生は2007年8月29日。Ｐｅｒｌ＼パール(苦笑)のそれは2009年11月2日なので、類似商号で争えばまず負けない筈だけど、私は法律のど素人なのでつっこみうぇるかむ。 コメントでも書いたのだけど、気になったのでその業界の友人に聞いてみました。 素人にはなかなか解りづらかったのですが、なか
nginx の組み込み Perl で独自の認証をかける - 酒日記 はてな支店
独自の認証機能付き HTTP ダウンローダを提供するために、nginx の組み込み Perl を使ってみました。 公式のドキュメントはこちら。EmbeddedPerlModule - Nginx Community 自前の handler でリクエストをみて処理を行い、許可するなら DECLINED を返して後続の処理に任せる。そうでなければ Fobidden を返しておしまい、という流れです。 package MyAuth; use strict; use warnings; use nginx; sub handler { my $r = shift; if ( $r->header_in("MyAuth") ) { # なにか独自の認証をする(ここではリクエストヘッダを見るだけ return DECLINED; # 処理を継続させるために DECLINED } $r->status(
Snow Leopard の Perl とアーキテクチャ - unknownplace.org
Snow Leopard には二つの Perl がインストールされている /usr/bin/perl5.10.0/usr/bin/perl5.8.9 デフォルトの /usr/bin/perl は 5.10.0 のほう。それぞれユニバーサルバイナリになっていて、 $ file /usr/bin/perl5.10.0 /usr/bin/perl5.10.0: Mach-O universal binary with 3 architectures /usr/bin/perl5.10.0 (for architecture x86_64): Mach-O 64-bit executable x86_64 /usr/bin/perl5.10.0 (for architecture i386): Mach-O executable i386 /usr/bin/perl5.10.0 (for arch
Plack::Server::Standalone系を使ってウェブアプリケーション開発と運用が楽になる話 - JPerl Advent Calendar 2009
Plack::Server::Standalone 系を使ってウェブアプリケーション開発と運用が楽になる話 - JPerl Advent Calendar 2009 Perl に関するちょっとした Tips をのっけてみるよ。ちゃんと続くかな？ 既存の環境に対する不満 Perl のウェブアプリケーションを構築するにあたっては、リバースプロキシと mod_perl を組み合わせるか、あるいは FastCGI (ExternalServer) を利用するのが一般的だと思います。しかし、どちらをとっても、環境を構築して設定するのが難しいというのが個人的な不満でした (mod_redirect を設定したり mod_fastcgi にパッチをあててインストールしたり startup.pl を書いたり...)。自分が Plack の開発 (主に Server::Standalone と Server
プラグマをストップさせよ！ | taro-nishinoの日記 | スラド
CPANを常日頃観察している方は、やたらとプラグマもどきが多いことにお気づきだと思います。これらは目的が多少違っていても、多くはベストプラクティスのためだと言ってもいいでしょう。 いいプログラマの素質にはいろいろな要素があります。当然頭が切れる、理解が速い、構想力に秀でている等いろいろあるでしょう。私が思うには、最低限必要なことがあります。つまり己を知っていることなんです。自分の弱点、短所、悪癖等を自覚していることです。その弱さを知っていれば、当然それをカバーするものはないかと探して、strict、warningsのコアプラグマはほぼ誰でも必須であることに気がつくはずです。自分が駄目だからそれらに頼らざるを得ないのです。後、使うべきプラグマは個人差があるでしょう。日本人なら日本語リテラルを書く機会が多いから、どうせ書くならUTF-8でやるのが面倒が無いのでutf8プラグマでしょう（これも極
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
YAPC::Asia2009の特別研修「Moose入門、モダーンなオブジェクト指向システム」が超良かった！ - こんにちはこんにちはmonmonです！
Shawn Moore(Sartak)の講義でした。同時通訳。 感想。 超楽しかった！！sartakがとてもいい人だった！ちょっとした質問でもコード書きながら教えてくれた。 もっとみんな受けたらいいのに！もう終わっちゃったけど！ 機能毎に、講義→実習→講義→実習、の繰り返し。 これがとても楽しかった。 1日最後まで楽しくコード書いて過ごせた。 実習の内容も、既にあるテストが通るようにモジュールを作成してテストが通ったら「やったー！」みたいな。 gitに資料があるのでみんな落としてやったらいいよ！ccのライセンスで公開してるので。 きっとtestファイル自体もキレイに書いてあるはずだから見たらいいと思うよ JPAにすごい感謝でした。3日間全部受けておけば良かったと思った。 以下メモ。 Part0: Mooseのコンセプト perl6からいろんなアイディアをもらってる まずはざっくりMoose
Class::Accessor::Fast から Mouse へ - bonar note
Class::Accessor::Fast（以下 C::A::F）を使っているクラスで、例えば Role っぽいものを表現したくなったりして、Mouse::Role 使いたい！Mouseに移行しようかな、みたいなことがあったりします。 この2つは機能的にもだいぶ違うものでもちろん簡単には比較できません。Mouse の場合には 単純にアクセサを追加するだけじゃなくて、読み書き権限の制御や方を用いたvalidation等よりきめ細かい制約を持つクラスを作ることが可能になります。 なので、その機能の代償として単純なクラスでも当然遅くなります。ある程度はしょうが ないし、 そのコストを払う価値があれば問題ないのですが、どれくらいのインパクトなのかは知っ ておく 必要があると思います。とても小さなクラスで簡単なベンチマークを取ってみました。 以下の環境で行ないました。 Mac OS X 10.6 C
AnyEvent::Intro チョー訳 その１ - download_takeshi’s diary
最近perl界隈で話題のAnyEventについて、今のうちに習得しておくとid:miyagawaみたいにクールになれて、もしかしてモテるのではないかと思い、よっしゃ、勉強してみるか、ということでドキュメント読み出したんですが、、えらいボリュームですね。心がポッキリ折れました。 い、いや、そんなことではいかん！頑張るぞ。 というわけで、折角なので、チョー訳を残していこうと思います。AnyEventはおさえておきたいけどドキュメントの長さに呆然としてしまったアナタ、ダウンロードたけしと一緒にレッツスタディしようぜ！ なお、AnyEventのドキュメントはすごく長いので、ぶつ切りでいきます。最後まで書き綴れるかどうかは不明です。 さらに英語にはあまり自信がないくせに、要所要所ですごく意訳的なことをしています。誤訳などありましたら指摘して下さいませ。 ※原文はこちら http://search.c
PSGI/Plack勉強会 - Kentaro Kuribayashi's blog
PSGI/Plack勉強会を開きました(ひとりで)。資料はGitHubにあげてあります。いろいろまとめ書き足りてないのですが、自分的には納得したので満足してしまいました。 http://github.com/kentaro/psgi-study 以下にもコピペ。 PSGI/Plackとは？ PSGI = Perl Web Server Gateway Interface Specification WebサーバとWebアプリケーションとの間のインタフェイス仕様 Plack = PSGIのリファレンス実装 PSGI実装のひとつ(とはいえ、やたら気合いの入った感じになってるけど) PSGI != Yet Another WAF PSGI != Plack PSGI策定の背景 各Webアプリケーションフレームワークがバラバラに実装していた、WebサーバとWebアプリケーションとのインタフェイスを
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
PSGI/Plackは本質・本命・本流・本気でした - Eorzea Lounge
南陽市 パチスロ 店舗 口コミ 「当時最高の女優だったシム・ウナの演技復帰を共有できることは光栄だ」と付け加えた 土岐市 パチスロ 恵比寿 マスカッツ 目 押し 2024年の横浜アリーナ公演も決定したコンサートホール勝田台スーパーときめき♡宣伝部は,ギャンブル スポーツ【ToK8.me】最大1,000 USDTまでの75％キャッシュバック⚡⚡ギャンブル スポーツ❤️K888VIP.com❤️最大1,000 USDTまでの75％キャッシュバック パチスロ 沖 ドキ 基本 八女市 パチスロ 最高 出 玉 動画 日本のアニメがさらにお得 【ディズニープラス/2月配信】クリプトスロット入金不要ボーナス 千葉県勝浦市 パチスロ 戦国乙2 リセット 国籍を超えた友情を明かす…「カップルTシャツ＆ギター」（画像提供：wowkorea） 韓国のガールズグループ「TWICE」のメンバー, パチスロ 水着 壁
ゆーすけべー日記
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
ダブルクリックで動かすPerl scriptのためのCarp - Practice of Programming
なんだそりゃって話ですが、例えば、Windowsで、perlプログラムを作って、ダブルクリックで実行すると。 die したときに、あっというまにプロンプトが消えちゃって、わけわかんねってなっちゃいますが。 (追記)charsbarさんによると、レジストリをいじることでWindowsでプロンプト開きっぱにもできるようです。副作用があるようですが。 http://d.hatena.ne.jp/charsbar/20090604/1244104249 そういうときは、例えば、このようにしていたわけです。 BEGIN { $SIG{__DIE__} = sub { print STDERR @_; <>; } } 毎回面倒くさいなぁ、と思い、こういうのはどうかなと。 package Script::Carp; use Carp (); use strict; use warnings; our $
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
502 Bad Gateway
Perlゼミ(サンプルコードPerl入門)