いい感じに出力をインデントしてくれるモジュール #perl - 詩と創作・思索のひろば
[2013-11-20: Print::IndentedがCPANになくてしょんぼりしている。 とのことで shipit いたしました。 あざーす！] 過去のよく分からないコードの挙動を把握したいときには print (warn) するのが少なくともとりあえずの方法としては常套手段ですが、これがただ平坦に画面に現れるだけだと見づらい。例えば条件分岐やループの中にいる時は出力をインデントするようにすると動きが掴みやすくなるけれど、ただでさえ人間に単純労働を課す print デバッグにそこまで労力を使うのは辛い。そういう面倒さを減らそうという動機で、このモジュールは書かれました。 https://github.com/motemen/perl5-Print-Indented 一体何をするのかというと今書いた通りですが、print 時に、その print 関数の呼び出しコードのインデントに応じて
パール、アナルを使え！または私は如何にして Perl のワンライナーを書けるようになったか - 詩と創作・思索のひろば
簡単に言うとこういうことです。今日はこれだけ覚えて帰ってください。 perl -anal -e "…" 同様のオプションは Ruby でも使えます。 解説 -a いきなり見かけないオプションですが、入力を空白文字で区切り、@F という配列に入れてくれます。それ以外の影響はないので使わないときでも指定して問題なし。2 回指定してるのも意味ないです。語呂合わせです。Ruby の場合は $F ですね。 -n -e で指定されたコードを LINE: while (<>) { … } で囲みます。標準入力やファイルを一行ずつ処理するときに便利。sed や grep が簡単に書けますね。ワンライナーでは多様するオプションでしょう。代わりに -p を指定することで最後に print; することもできます。 -l -n や -p が指定されているときに各入力を chomp します。また、各出力に改行を追加
Future Perl - YAPC::NA 2013 に参加して - tokuhirom's blog
YAPC::NA 2013 に参加してきました。その中でも印象にのこったことを取り急 ぎアップしておきます。 今回は日本からは @yusukebe と @xaicron と TPF の President である Karen が参加していたようです。 僕は今回がはじめての US だったので、いろいろと困惑することもありました が、旅行記などには興味がないという人も多いでしょうし、書くのがめんどく さいですし、たぶん xaicron が書くと、ほとんど内容がかぶるので割愛させ ていただきます。 デニーズのシェイクに興奮する yusukebe と xaicron 本エントリーでは YAPC::NA で僕が感じたこと、技術的に Perl Community が どこに向いているか、といったあたりのことについて述べていきたいとおもい ます。 今年は Perl 25 周年ですので、これまでの Per
xpathからfeedをつくるサービスを作りました - 大西ブログ
先日の kyoto.pm ハッカソンで、時代錯誤な feed 生成ツールを作りました。 なんでもRSSとか類似サービスいろいろあるとは思いつつ、scrapeするコード書くの好きだし、kindle本セールのフィードが欲しかったので作ってみました。完全自動でフィードつくるより、xpath（もしくはCSSセレクタ）で指定できる方が好みのフィードが作れそうというのが理由です！ http://xpathfeed.com/ 使い方は簡単です。任意のURLを入力します。 すると、iframe内にコンテンツが表示されます。 こっから、フィードにしたいアイテムを選びます。Yahooの「主なサービス」のフィードを作ろうと思ったら、マウスカーソルをフォーカスすると… iframe内右上に xpath がサジェストされます(cho45の jautopagerize のコードをパクりました)。これを参考に、リストア
Re: use fields; と my TYPE EXPR; - Islands in the byte stream (legacy)
これ、コンパイル時チェックというのはあってますが、実効速度が遅いというのは誤解です。 use fields; と my TYPE EXPR; - 日々量産 fieldsを使うと、フィールドに不正な代入があったら、"コンパイル時"にはじくことが出来る。 ハッシュキーをよくtypoする人にはおすすめだが、実行速度は遅い。 typed myはコンパイル時にしか効果を及ぼさないので実行速度へのペナルティはありません*1。件のベンチマークでスコアが出ないのでは、fields::new()が遅いからですね。fields::new()の意味は、5.10.0より前のバージョンとの互換性のためと、実行時チェックのためのHash::Util::lock_keys()の適用です。5.10.0以上限定で実行時チェックが不要なら使う必要はありません。 コンパイル時チェックというのは次のようなことです。 packag
一行でも書け、倒れるときは前のめり（または書かないで済ませる話） - uzullaがブログ
先週金曜日にPerlCasual #5(http://atnd.org/events/37158)が開催されました。 どう考えても発表者の中で俺だけレベルが浮いて（沈んで）いますが、まあ発表してきました（LT軍は、半数が「なんで俺がPerlの会で発表してるの？」と言っていたことを付け加えておきます）。 感想として、とてもたのしかったので、詳細は他の人のブログとか見ましょう。 スライドはこちら Perlcasual #5 発表資料 from Junichi Ishida ※1，2ページ目は当日のネタなのですが、素材を活かす為に削除しないでおきます（めんどくさい） すみませんでした 今は @uzulla による、からみ酒トーク #perlcasual— nipotan (谷口公一) (@nipotan) 2013年3月29日 ものすごい酔いどれ発表だったと思います。テンパっていたというわけでは
Plack Performance Tips - mount() and query_parameters() : D-7 <altijd in beweging>
すごいヘビーな負荷を受けているPSGIアプリケーションで「なんでこれで負荷があがるの？」的な現象があったので二つほどTipを。ちなみにこれは 2013/03/06時点での話なので、もしこれをあなたが大分将来に読んでいるのなら、状況に変更がないかちゃんと確認すること！ まずこのお話の前提：mod_perlなアプリをPSGIに移行したかった。アプリはmod_perlハンドラで書かれているので、Apache::RequestをPlack::Requestに書き換えたり、ハンドラ部分をオブジェクトにしてキレイにするくらいで、基本的な構造は何も変えてない（←ここポイント）。あとはApache側とか設定をもりもりいじって、PSGIファイルを書いて、Starletでデプロイして、パフォーマンスが30%くらい悪くなった。さて、犯人は誰でしょう？ まずアプリケーションを組む側が「やっちまったなぁ？」な件：P
DBIx::TransactionManager の目的と、その使用法について - tokuhirom's blog
おはようございます。 DBI では当たり前のように $dbh->do('BEGIN') と $dbh->do('COMMIT') をつかえばトランザクションがつかえるわけですが、なぜ DBIx::TransactionManager のようなものが必要になったのでしょうか。 それは勿論、DBI で直接 transaction をとりあつかうと問題が発生するケースが存在するからです。 トランザクションと RAII一番おおきいのは、トランザクションが中途半端な状態になってしまうことを阻止することです。たとえば、以下のようなケースでは、おかしなことになってしまいます。 my $dbh = DBI->connect(...); for (@stuff) { eval { $dbh->do("BEGIN"); $dbh->do(q{INSERT INTO t1 (v) VALUES (?)}, $_
YAPC::Asia Tokyo 2012レポート Perlから広がるWebエンジニアのパワーと一体感 - はてなニュース
Perl言語を活用するITエンジニアのカンファレンス「YAPC::Asia Tokyo 2012」が、9月27日から29日まで東京・本郷の東京大学で開催されました（27日は前夜祭）。800人以上のエンジニアやIT関係者が参加し、60セッション以上の技術的な発表に加えて、多数のライトニングトーク（5分程度の短い発表）がありました。当編集部が撮影した写真を中心に28・29日のレポートを掲載します（左は28日のオープニングで開会を宣言するYAPC::Asia運営事務局長の櫛井優介さん）。 ▽ HOME | YAPC::Asia Tokyo 2012 YAPC（Yet Another Perl Conference）は、1999年にアメリカではじまったPerl言語のユーザー・カンファレンスです。歴史的な経緯とプログラマー特有の遊び心から「Yet Another（さらにもう1つ別の）」と名乗ってはい
phantomjs を Perl からつかえる Wight をためした記録。 - tokuhirom's blog
YAPC で motemen さんが発表していた Wight をためしたのでそのメモ。 まだ開発途中なかんじなのでドキュメントなどは揃っていないが、ひととおりのメソッドは用意されている、といった印象です。しかしいくつかハマりどころもあるのでメモしておきます。 背景として、テストしたいとかではなく Crawler とかを Wight つかって書こうとしてみているという話です。 Wight::Node のドキュメントがないドキュメントないのはともかくメソッドの一覧もないのはきついので、pull-req をおくった。 https://github.com/motemen/Wight/pull/4 おくったあとできづいたけど Wight.pm の方にちょっとかいてあった。。でも Wight/Node.pm の方にかいてあるとありがたいです。see NODE METHODS section in W
Hachioji.pm
Hachioji.pm とは？主に東京西部、神奈川西部のエンジニアの交流を目的とした地域勉強会です。 普段エンジニア交流会は都心部、平日に多くおこなわれており、それらの補完を目指しています。 pmとついている様に、Perlユーザーが多くいますが、話題はPerlに限定されているわけではありませんし、主催を始め、PHPやGo、Java、JS、HTML等をPerlよりも使っている人多くいます。 エンジニアであれば、お気軽に参加いただければと思います。 参加するには？不定期にATND(イベント参加ページ)が立ちます 主催のATND #hachiojipm ハッシュタグでTwitterを確認してもよいでしょう。 Hachioji.pm のSlackが一番間違いなく情報を入手できます。 「サイト消えたの？」(過去ログをまったく更新できていなかったので…)
Hachioji.pm
Hachioji.pm とは？主に東京西部、神奈川西部のエンジニアの交流を目的とした地域勉強会です。 普段エンジニア交流会は都心部、平日に多くおこなわれており、それらの補完を目指しています。 pmとついている様に、Perlユーザーが多くいますが、話題はPerlに限定されているわけではありませんし、主催を始め、PHPやGo、Java、JS、HTML等をPerlよりも使っている人多くいます。 エンジニアであれば、お気軽に参加いただければと思います。 参加するには？不定期にATND(イベント参加ページ)が立ちます 主催のATND #hachiojipm ハッシュタグでTwitterを確認してもよいでしょう。 Hachioji.pm のSlackが一番間違いなく情報を入手できます。 「サイト消えたの？」(過去ログをまったく更新できていなかったので…)
Perlでコマンドラインオプションの解析に Getopt::Long を使う時、絶対に忘れてはいけない引数 - たごもりすメモ
Perlでコマンドラインオプションをparseしようと思うと組込みモジュールとしては Getopt::Std と Getopt::Long がある。が、long style option *1 つまり --option-name のようなオプションを解釈してくれるのは Getopt::Long だけだ。なので普通はこちらを使おう。 ただし 絶対にデフォルト、つまり以下のようにして使ってはいけない。 use Getopt::Long; my (@primary, @secondary, $silent); GetOptions( "server-primary|p=s" => \@primary, "server-secondary|s=s" => \@secondary, "silent|S" => \$silent ); これダメ！ 絶対ダメ！ 死ぬ！ 最初に結論を書く 必ず以下のように
YAPC::Asia Tokyo 2012 にてLT-THON なるイベントが開催されるようです - その手の平は尻もつかめるさ
Perl の祭典、YAPC::Asia Tokyo 2012 でLT-THON なるイベントが開催されるようです。 ので、ここぞとばかりに宣伝致します！！ LT-THON? なにそれ食えんの 詳しくは、↓をご覧いただくこととしまして。 YAPC::ASIA 2012 LT-THON 端的に説明しますと YAPC 開催期間中、メイントークをやっている裏側で 延々延々LT を敢行し 聴衆をガッツリ集めてメイントークを食う！！！！！！ という企画です。(小嘘)*1 LT-THON じゃ人材求めてます LT-THON は目下のところLT 発表者を募集しているようです。 「最終的には30人程度の発表者がいれば嬉しいなァ」というのは主催の弁ですが、 それとは裏腹に、現在集まっている人材は6人くらいだそうです。(2012.09.01 時点) なので 今から準備しても、YAPC で喋れる！！ 素晴らしい！
Plack 1.0 and the future
I’m proud and excited to announce the long-awaited release of Plack 1.0 on CPAN. This is our 120th release since we started this project on October 2009 and has commits from 92 developers (counting with git log and including duplicates from different email address). Congratulations to everyone involved in the project! Why now? The previous release was 0.9991, it was obvious we were running out of
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
PrePAN - DISられないCPANizeを目指して
Social Media Marketing Trends 2024 // The Global Indie InsightsKurio // The Social Media Age(ncy)
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Reply is awesome! - tokuhirom's blog
Kentaro Kuribayashi - Rubyistの国のPerl使い
10 more things to be ripped off
