2013年9月

perlでirbしたいと思ったら出来るみたい

前にRubyの勉強会に参加した時に irb を教えてもらって、便利だったのでPerlでも同じようなことが出来ないかググったら出来るみたい。 Perl5 で irb 相当のことをする方法、すなわち REPL をする方法 - blog.64p.org Perl5 で REPL(Read-Eval-Print-Loop)をつかいたければ、perl -de 1 をつかえばいい。 DB<1> $x = 1; DB<2> print $x; 1 ただしレキシカルスコープが保存されないとの事。 my $x = 1; print $x; が正しく動作しない。 で、解決法として Eval […]

Net::Google::Analytics::OAuth2 で「エラーredirect_uri_mismatch」って言われてrefresh_access_tokenが取得できない時の対処方法

refresh_access_tokenの取得 Google AnalyticsのAPIを活用してごにょごにょしたくてPerlでGoogle AnalyticsへアクセスするならNet::Google::Analyticsが便利 - ゆーすけべー日記を参考に試していたのだけれど、refresh_access_tokenが取得できない。 use Net::Google::Analytics::OAuth2; my $oauth = Net::Google::Analytics::OAuth2->new( client_id => 'your_client_id', client_se […]

[Perl] DBIx::SkinnyでGROUP BY句を使うには

※何故か記載が全体的にORDER BY句になっていたので修正... DBIx::SkinnyでGROUP BY句を使う DBIx::SkinnyでGROUP BY句は使えないっぽい。マニュアルにも無い。Tengでは使えるみたいだけれど。resultsetでSQL組み立てれば出来るのかと思ったのだけれどどうも無理っぽい。 で、ググっていたらテストにそれらしい記述があるのを発見。ただし、DBIx::Skinny::Pager のテスト。 https://github.com/walf443/p5-dbix-skinny-pager/blob/master/t/02-functional.t $rs […]

YAPC::Asia 2013へ行ってきたよ

公式サイト:YAPC::Asia Tokyo 2013 2013/9/20-22で行われたYAPC::Asiaに初めて参加してきました。日頃からCPAN含め、Perl mongersの方々には(間接的に)お世話になっているので感謝の意味も含め個人スポンサー枠で参加しました。なんとTシャツ付き。写真のミニ提灯も特典として会場に飾られていました。 YAPC::Asia 2013 パンフレット&配布ノベルティを全て紹介を読んで知ったのですが、ホントは個人スポンサー特典として別のTシャツもあったみたい...orz 残念 会場 会場の慶應義塾日吉キャンパスは、非常に設備が整っていました。建物とかトイレと […]