Multiple ways to inheritance in Perl—The Phoenix Trap
Inspired by my parents coming to visit at the end of the week, I thought I’d write about how Perl classes can have “parents” as well, from which they inherit methods. Although it might seem on the surface as though there’s more than one way to do it, these techniques all share the same underlying mechanism. Where it all BEGINs: @ISA Perl classes are just repurposed packages, i.e., a
おそらく先がない5つのプログラミング言語？ - YAMDAS現更新履歴
おそらく先がない5つのプログラミング言語、といういろいろと怒りをかいそうな記事だが、どうせワタシが愛する C 言語なんかがまたやり玉に挙がってるんだろうと見たら、一番最初に Ruby が挙がっている…… この記事は TIOBE や RedMonk のプログラミング言語ランキングに Dice 独自の求人票情報を加味してるようだが、Ruby は落ち目という認識らしい。うーむ。 それ以外には Haskell、Objective-C、R、そして Perl が挙げられていて、この手の記事の定番といえる Perl、Swift 誕生後やはり定番である Objective-C はそうですかという感じだが、ビッグデータの時代に人気を高めた R 言語ですら、Python に追いやられつつあるというのはそうなんでしょうね。 それにしても Ruby が先がないという意見には異論が出るだろう。ネタ元は Slashd
googleのエンジニアが書いたPerlの入門記事を紹介してほしいと依頼されたので紹介するよ - Perl入門ゼミ
1ヶ月ちょっとくらい前に、僕のgmailの方に「googleのエンジニアが150時間」かけて書いたPerlの入門記事を紹介してほしいというメールが来た。YAPCなどがあって忙しかったが、ようやく落ち着いたので紹介するよ。僕の英語のブログの方でも紹介予定だけど、先にここで紹介しておく。 PERL Tutorial for Beginners - Complete Guide シリコンバレーのエンジニアは、Perlを紹介してくれることが少なかったような気がするけれど、最近は、Google APPエンジンのところでPerlに対応したことを伝えてくれたり、Amazonの人工知能のスケーラブルなMXNetクラウドでは、Perlのライブラリを公式に加えてくれたりしている。 そして、一か月くらい前には、googleのベテランのエンジニアが、Perlの入門記事を150時間かけて書いているのを、まとめたので
最近のPerlのExporter事情とかExporter::Liteとか | おそらくはそれさえも平凡な日々
結論 use Exporter 'import' で充分 説明 今のはてなでは割と標準的にExporter::Liteが使われている。Liteの方があんま余計なことしないからとは聞いてはいたが、それで依存増やすのもどうなのかなーとか思っていたので個人的にはこれまでExporterしか使ってなかった。Exporterは標準モジュールだし。Exporterにしてもuse parent 'Exporter'なのかuse Exporter 'import'なのかという流儀の違いがあって、個人的にはuse parent 'Exporter'を使っていた。その辺りについて再考した。 ExporterかExporter::Liteか もうあまりExporter::Liteを使う理由はないように感じる。 Exporterの最近のソースを読むと、かなりシンプルになっていることがわかる。 Exporterの複
[perl][memo] File::Tempのバッドノウハウ
■まとめ tempfile(...)が作成したテンポラリファイルは、環境によってはflockされていることがある tempfile(CLEANUP => 1)は、テンポラリファイルへの参照をretainする つまり、CLEANUPを指定している場合、参照カウントに頼った自動closeは機能しないので、明示的にcloseする必要がある また、明示的にcloseしないとflock可能にならない場合がある ■ログ 16:23:30 <kazuho_> あれ perl って file handle への refcnt がゼロになったら自動的に close してくれますよね 16:23:43 <tokuhirom> してくれますね 16:23:48 <tokuhirom> しなきゃおかしいw 16:32:33 <kazuho_> https://gist.github.com/kazuho/1116
Perl levels up with native subroutine signatures
It's been a long time coming, but subroutine signatures have just been added to Perl. Although Perl version 5.20 is not due until the Spring, you can use subroutine signatures with the latest Perl development release now. Requirements You'll need to install a copy of the latest Perl development release (v5.19.9). You can get this with Perlbrew: $ perlbrew install perl-5.19.9 $ perlbrew switch perl
perl 5.19.9 の signatures 構文 (普通に引数を書ける構文) を試す | tech - 氾濫原
Perl 5.19.9 で実装された signatures の構文をためしてみる - tokuhirom blog を見てそんなのできたのか〜と思ったので、いろいろ試してみた。なんとこれは、今までになく直感的に引数が書けてしまう革命的構文です。 use v5.19; use strict; use warnings; use feature 'signatures'; no warnings "experimental::signatures"; use feature 'lexical_subs'; no warnings "experimental::lexical_subs"; # 引数の数チェックをしてくれる。便利 eval { say "check length of arguments"; state sub hello ($foo) { say "hello $foo"; }
Perl 5.19.9 で実装された signatures の構文をためしてみる - tokuhirom's blog
use 5.019009; use autodie; use feature 'signatures'; no warnings "experimental::signatures"; package Foo { sub new($class, $n) { bless {n=>$n}, $class; } sub bar($class, $a) { $a+3; } sub baz($self, $a) { $self->{n} * $a; } } sub add($left, $right) { return $left + $right; } say add(1,2); say Foo->bar(4); say Foo->new(5)->baz(4); みたいな感じでつかえる。 【追記】 use 5.019009; use feature 'signatures'; no warning
Perl meets GPU - Qiita
Perl Advent Calendar, 20日目担当しますpapixです. 宜しくお願い致します. 今日は, ｢Perl meets GPU｣というタイトルで, PerlとGPU, そしてGPUを利用したGPGPUについてのお話をさせて頂きたいと思います. GPGPUとは? GPGPUとは, General-Purpose computing on Graphics Processing Unitsの略語で, グラフィックボード(GPU)の演算資源を, 画像処理以外の汎用演算に用いる技術のことです. GPUには, 画像処理を高速に行うために大量のコアが搭載されているので, これらのコアで処理を分散することで, 高速化を実現します. GPGPUを上手く利用すれば, シミュレーション, 暗号解読, 音声処理などのデータ並列性のある処理を, 高速かつ低コストで実現できるので, 特に学術分野で
Log::StringFormatter でログ文字列のフォーマット - Qiita
ログが主食のかぜぶろです。ログがないと生きて行けません。 ログと言えばLog::Miminalですが、Minimalと言いつつも様々な拡張がなされており、好みの使い方にたどり着くまでに少し時間がかかるようになってしまったなと作者自身うすうす感じております。そこでLog::Minimalがもつ機能を分解し、アプリケーションの開発者にとって使いやすいログモジュール／メソッドを開発者自身で作りやすくしようという狙いのもと作ったのが、Log::StringFormatterです Log::StringFormatterはLog::Minimalの文字列の整形部分を切り出して単独のモジュールにしたものです。 使い方 use Log::StringFormatter; use Scalar::Util qw/dualvar/; stringf('foo') -> 'foo' stringf('%s b
MongoDB.pmをMouseに書き換えてみただけ - ぱいぱいにっき
あ、はい、マコピーです。最近麻雀にハマっています。 そんなわけなんですけれど、最近MongoDBを僕が関わっている案件に導入しまして、こいつで解析をやろうと思ったわけなんですが、PerlでMongoDBを扱うためのモジュールがいくつかあって、 MongoDB - A Mongo Driver for Perl - metacpan.org 公式のやつ AnyMongo - Asynchronous non-blocking MongoDB driver for AnyEvent applications - metacpan.org AnyEvent使うやつ MongoDB::Async - Asynchronous Mongo Driver for Perl - metacpan.org Coroとか使うやつ とまあいろいろあって、参考にしたのは PerlでMongoDBを扱う際のモジュ
bless と Mouse、あとClass::Accessor::Lite でオブジェクトを作る際の性能比較 - その手の平は尻もつかめるさ
巷で「爆速！ ヤバすぎ！」と目下話題の Mouse ですが、「bless でオブジェクト作るよりも速い」という風なことがちらほら聞こえて参りましたので、そこら辺を比較してみました。 今回は生 bless と、Mouse、そして参考として Class::Accessor::Lite の3つを比較しました。 なお、Perl のバージョンは 5.16.3、Mouse のバージョンは1.11、C::A::Lite のバージョンは0.05 でお届けして参ります。 比較に利用したのは以下のコードです。 かくして結果はこのようになり、流石に bless よりも速いという結果は得られませんでしたが、Class::Accessor::Lite よりかは高速ということで Mouse すごい、という感じですね。 しかしながら、上記のコードを以下のように書き換えると (わかりにくい！ との指摘を受けましたので補足
続・技術的負債の把握と改善を促すために - mixi engineer blog
こんにちは, 先日Kansai.pmで発表させて頂いたgoccyこと五嶋＠たんぽぽグループです. 今回は, 前回紹介した技術的負債の把握と改善を促すためにの続編として, 僕が作ったPerl5コードのコピペ検出器について紹介させて頂きます. はじめに 今やPerl, Ruby等さまざまな言語で, 便利なライブラリ群やフレームワークを利用できる時代になりました. これらを使うことでソフトウェアの開発コストは格段に下がり, より素早く開発することができるようになっています. しかし, 当初予定されていた機能を実装して, 「よしできたから終わり！」というわけにもいきません. 何か物を生み出せば, 必ずそれを保守・運用するコストが発生します. 開発することが便利になった今, 開発物を保守・運用することを支援するツールも求められています. ですが, 保守や運用, とりわけ保守に関して支援するツールはそ
Perlは本当にｵﾜｺﾝなのか調べてみた
Perlは、日本国内では私と同年代（30代後半）の人を中心に、相変わらず人気があると思う。 しかし、私がよく見ているStackOverflow/DZone/InfoQ辺りでは、確かにこの数年はあまりPerlを見かけないという感覚があった。 そこで、Googleで『Perl site:stackoverflow.com』『1年以内の記事』のような感じで、いくつかのプログラミング言語の検索結果の件数を調べ、グラフ化してみた。 (;´Д`)…
perl - use Carp; # warn() と die() だけじゃなくて : 404 Blog Not Found
2008年06月30日04:00 カテゴリLightweight LanguagesTips perl - use Carp; # warn() と die() だけじゃなくて 以下のエラー処理の方法にちょっと口を挟みたくなったので。 エラー処理を行う。 - サンプルコードによる Perl 入門 warn() vs. die() まず、warn()の使い方。エラーに対して使ってはいけません。warnはその名の通り、あくまでもエラーではなく警告です。エラーの際にはdie()を使わなければなりません。 警告とエラーの違いですが、警告は「続けて処理してもいいけど、これはあなたの意図ではないかもしれません」という場合、エラーは「このままでは処理を続けられません」という場合です。 たとえばperlの場合、抜けた引数はundefなので、数値としては0、文字列としては''として解釈されます。それらをデフ
Perl Beginners #6 に参加して参りました - その手の平は尻もつかめるさ
いつの話だ！！！ *1 今回はJPA 代表の牧さん (@lestrrat) が特別講師 *2 として来られていました。 Q&A セッションとして、1時間牧さんに自由に質問して牧さんがそれに答える、というスタイルで進めていました。 以下まとめ 牧さん (Q&A セッション) コードのコメントは英語で書くのか、日本語で書くのか GitHub とかにアップするコードは英語 仕事で書くコードの時は、日本語で書いたりもする 結局、その「ソースを読む対象」による CPAN モジュールのひな形を作るモジュールは何を使っているのか 何も使わない XS の時はオレオレひな形を使う ライブコーディングで実証 "makamaka" を"nakanaka" に書き換えるモジュール マジで何一つ使っていなかった！！！ XS は本当に面倒臭い XS モジュールを書きたいんだが、何か良い教材は無いか 「モダンPerl
Log::Minimal でデバッグログを出力する環境変数の変更方法 - blog.nomadscafe.jp
Log::Minimalでデバッグログを出力する時は $ENV{LM_DEBUG} = 1; debugf("hello Boofy"); と環境変数 LM_DEBUG を使うのですが、実はこの環境変数名はカスタマイズ変更可能で local $Log::Minimal::ENV_DEBUG = "MYAPP_DEBUG"; $ENV{MYAPP_DEBUG} = 1; debugf("hello Boofy"); と、$ENV_DEBUG を書き換えることで別の環境変数を参照させることができます。 (0.14時点でドキュメントにないですが..) 先日出した Log::Minimal 0.14でこのカスタマイズにもうひとつの方法が追加されました。hirose31さんpullreqありがとうございます！ use Log::Minimal env_debug => 'MYAPP_DEBUG';
Perl5 における関数 prototype の取扱いについて - tokuhirom's blog
いろいろな人が prototype をつかってるのをみてきましたが、 sub foo(&) { }として foo { }のように、block を coderef としてうけとるパターン以外では、つかわない方がいいです。 それと、定数の場合。 sub FOO () { }理由は後でかく。
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Perlコーディングテクニック2018
Building a blog engine using Perl Dancer