B::Xref で Perl のソースコードを読む - Articles Advent Calendar 2011 Casual
こんにちは。 risou です。 とうとう最終日。 今回は Perl のソースコードを読む時の補助に使える B::Xref についてちょっと書きます。 使い方 使い方はとっても簡単。 perl -MO=Xref ***.pl これで対象の Perl のソースコードを解析した結果を出力してくれます。 出力結果は以下のような感じになります(適当に加工しています)。 File /opt/local/lib/perl5/site_perl/5.12.3/JSON.pm Subroutine (definitions) Package JSON &from_json s123 &import s112 &jsonToObj s124 &objToJson s133 &to_json s132 Subroutine (main) Package (lexical) $backend i56, 58,
Webスクレイピング入門 - Articles Advent Calendar 2011 Casual
Webスクレイピングとは？ 例えば、昇天するくらいかわいい猫画像ください : あじゃじゃしたーの猫の画像が欲しいときにどうすればいいでしょうか*1。画像を1つずつ手作業で保存？面倒くさいですね。 そんなときのためのWebスクレイピングです。まずはじめは、Web::Scraperというモジュールを使ってみましょう。 use strict; use warnings; use autodie; use File::Basename; use File::Spec; use LWP::UserAgent; use URI; use Web::Scraper; my $url = 'http://blog.livedoor.jp/chihhylove/archives/3573873.html'; my $scraper = scraper { process '.main img.pict, .
Getopt::Longでコマンドラインのオプション指定をサクっと簡単に取得する - Articles Advent Calendar 2011 Casual
こんにちは、torii (@yoshi704)です。 コマンドラインで完結するCUIアプリをサクっと作る前に楽をするための便利モジュール Getopt::Long を紹介します! 普段良く使うコマンドで -l とか -u とか --help とか付けてよく使うと思います。 自分でCUIアプリを作成して使う時にもこんな感じのコマンドラインオプションを簡単に使えると便利ですよね! コマンドライン引数はすべて@ARGVに入ることは知っていてもいざオプションを１つ１つ解析しようと思うと意外と面倒です。 その時に使う便利モジュールがGetopt::Longです。 GetOptions()という関数で、コマンドラインオプションを定義してあげます。 例えば、 $ ./sample.pl --user=torii --env=dev --times=2 --verbose hoge.dat というようなオ
Calendar::Japanese::Holiday - 日本の祝日を求める - Articles Advent Calendar 2011 Casual
こんにちはこんにちは、sakurako_sです。 日本の祝日を求めるのに便利なCalendar::Japanese::Holidayをゆるふわっと紹介します。 このモジュールには2つの関数があります。 isHoliday() - 指定日が祝日なら祝日名を返す getHolidays() - 指定月の祝日とその名前のハッシュリファレンスを返す コードを見てみましょう。 use strict; use Calendar::Japanese::Holiday; use YAML qw/Dump/; use Perl6::Say; binmode STDOUT, ':utf8'; # 祝日の名前 say isHoliday(2012, 1, 9); # 指定月の祝日 say Dump getHolidays(2012, 1); 実行結果は次の通り。 成人の日 --- 1: 元日 9: 成人の日 振
Smart::Matchで快適スマートマッチ - Articles Advent Calendar 2011 Casual
こんにちは。Perlで遊ぶと言うより、 未だ、Perlに遊ばれているtaiju (id:jdg) です。 YAPC::Asia TOKYO2011に参加したので、爪あとを残すべく、Perl Advent Calendar 2011に参加することにしました。 さて、Perl5.10から導入されたスマートマッチですが、これをより快適に使えるモジュールがないか、CPANで探してみたところ、Smart::Matchというモジュールが見つかりましたので、ご紹介したいと思います。 Smart::Matchはスマートマッチを快適に使うためのユーティリティをたくさん提供しているモジュールのようで、デフォルトで比較演算子でスマートマッチが採用される、switch文などで便利に使えそうなユーティリティがたくさん導入されています。 junctive Perl6のJunctionのような動作をするユーティリティ群
Net::eBayで自分が好きなアーティスト作品の出品情報を常時取得する - Articles Advent Calendar 2011 Casual
こんにちは！dukkiedukkieです。年の瀬も押し迫ったいい週末ですね。 掲題からして「フツーにB2CサイトのAPIを利用してセコイことやる話なんじゃね？」と精彩に欠けるお題になっておりますが、本日はその程度のお話です。日曜日ですしね、まったりと。 かつ、自作モジュールというわけでもなく人様のモジュール。http://search.cpan.org/~ichudov/Net-eBay-0.55/lib/Net/eBay.pm、イゴールさんとお呼びすればよろしいでしょうか。 ネットでお買いもの いきなり私事になって恐縮なのですが、オッサンPerlerのわたくしはしばしば「筋金入り」のOTAKU系の人物と他人様から認知される機会が多くございます(^^)。自分では至ってフツーだと思っておりますし、「ホンモノのその道の人」と出会う機会もございましたため、その道の人から見れば大したレベルではない
dropbox-api-command - DropboxでLinuxライクなコマンド操作を - Articles Advent Calendar 2011 Casual
はい、One Page Appsの@su_askaです。 今日はちゃんとPerlの話をしようと思います。 DropboxというとクライアントOSにインストールして使用するイメージが強いですが、自分のサーバー上でも利用したい場合もあります。 Linux用のパッケージもあるので全部同期して構わなければそれをインストールする方法もあるのですが、デーモンまで上げるのはちょっと大袈裟だなーというシチュエーションもありますよね！ 例えば... 個人契約のサーバーで運用しているDBのバックアップ 期間削除 そんな時はdropbox-api-commandの出番です！（迫真 https://github.com/s-aska/dropbox-api-command インストールの仕方や細かい使用方法は上記URLを参照下さい。 豊富なコマンド群 linuxライクな ls **find** **sync**
Term::UI - サクッと対話的に入力を求める - Articles Advent Calendar 2011 Casual
こんにちは、コンビニに行くたびに店員さんから舌打ちされるdameninngennです。サックリと書きます！ 対話的に処理を進めるスクリプト書いたりしますよね！あの[yes/no]とか聞かれて入力するやつです！！ 例えばrsyncで--dry-runオプション付きで一旦実行して、そこから[yes/no]を聞いて本当にsyncするかどうかみたいな感じのやつです！！！ まず、標準入力から受け取るだけであれば、 my $str = <STDIN>; chomp $str; # do something # ... こんな感じに受け取ったりするかと思いますが、本当に[yes/no]が入力されたのか判定したりそうじゃなかったらもう一回入力求めたりとか書くのめんどくさいですよね。 そこらへんのめんどくささとかを解消してくれるTerm::UIというモジュールがあります。 誤解を招くかもしれませんがTerm
TheSchwartzでちょっとした大きなデータを扱いたい！ - Articles Advent Calendar 2011 Casual
こんにちは！普段は札幌の片隅でPerlをいじくっているlapis_twです。 某アイコンが可愛い方に発破かけられたのもあり、初CasualTrackです！ 最近はJobQueueを弄る事が多かったので、JobQueueに関するちょっとしたtipsを書きます。 といってもQudoとかではなくて、使い古されたTheSchwartzについてなのです。 worker.pl #!/usr/bin/perl package Worker; use strict; use warnings; use base qw/TheSchwartz::Worker/; sub worker { my ($class, $job) = shift; # なんかする $job->completed(); } 1; package main; use strict; use warnings; use TheSchwa
Geo::Coordinates::Converter - 位置座標の測地系やフォーマットを変換する - Articles Advent Calendar 2011 Casual
こんにちは。hatak (@hisashi) と申します。 モバイルデバイスでは GPS やネットワーク測位などで位置座標を簡単に取得できます。しかし、緯度や経度の計算は意外と面倒なものです。 14 日目は、このような位置座標を扱うときに便利なモジュール Geo::Coordinates::Converter をご紹介します。 測地系の違い 緯度経度で表された座標を扱う場合、「測地系」という基準を考える必要があります。 測地系には様々な種類があります。日本国内で利用されることの多い測地系は次の 3 種類です。 世界測地系 1984 (WGS84) アメリカで策定された測地系 GPS や Google Map などで採用されている 日本測地系 2000 (JGD2000) 日本で策定された測地系 2002 年以降の国内の基盤地図などで採用されている 旧日本測地系 (Tokyo) 2002 年
Net::Google::Analyticsを使ってGoogle Analyticsのデータを引っ張る - Articles Advent Calendar 2011 Casual
はじめに こんにちは！名古屋の片隅で細々とPerlを書いている issm と申します．一昨日の夜にボウリングを6ゲームしたおかげで腕とか膝とかお尻とかの筋肉痛が未だに収まりません． さて，Webサイト云々に携わられているみなさまにおかれましては，クライアントさんからページビューがどうの検索キーワードがこうのと相談を受け，設置した Google Analytics のアクセス解析データをまとめることに苦心されていることと思います．（まぁ実際にはそんなに簡単な内容ではないかもしれませんが．） Perl Advent Calendar 2011 Casual Track の13日目は，Perl で Google Analytics のデータを引っ張ることを簡単にしてくれるモジュール Net::Google::Analytics について，簡単な使い方を紹介します． Nick Wellnhofer
Mojolicious::Liteでウェブツールを作ろう - Articles Advent Calendar 2011 Casual
こんにちは、memememomoです。ゆるふわと聞いたので勢いで参加しました。 最近はPHPをメインで書いていて、perlは補助ツールなどを作るときに使っています。なので本当にゆるふわにperlを使っています。 perlはいいですよね。便利なモジュールがたくさんあるので、サクッとスクリプトが書けてしまいます。 自分の場合、スクリプトは一つのファイルでパパッと書いちゃうことが多いです。 今回ご紹介するMojolicious::Liteは、一つのファイルにウェブアプリを書くことができるフレームワークです。 インストール Mojolicious::Liteのインストールは簡単です。 $ sudo sh -c "curl -L cpanmin.us | perl - Mojolicious" これだけです。perlbrew環境ならsudoも要りませんね。 アプリの記述 おもむろにエディタを立ち上げ
Object::Container ‐ Containerを使って開発スピードをあげる - Articles Advent Calendar 2011 Casual
こんにちは！hirobanexです！PerlのWAFのKamuiを使って以来、Containerというのが大好きなんですが、どうもContainerというものがWeb上で見かけることが少ないのでカジュアルに紹介しますね！ Containerとは より一般的に言えば、newされたインスタンスやリファレンスをキャッシュしておくクラスで、いろんなクラスからそのクラス経由でキャッシュしたオブジェクトを利用するような形態のクラス、あるいは、そのクラスを生成をサポートするモジュール群、を指すといえると思います。 ここで紹介するのは、typesterさん作のObject::Containerで、Containerクラスの生成をサポートするモジュールです。Inside mobage platformをみると、しっかりしたところでも使われいるんだなーということが垣間見えます。 Containerのメリット
業務終了後、git logとDist::Makerでさっさと帰る話。 - Articles Advent Calendar 2011 Casual
こにゃにゃちはー。@hisaichi5518です。 今、バイトしてる会社では日報を送らなければなりません。 本日の業務とか本日の雑感とかを送るアイツです。こういうのって結構めんどいですね。 というわけで、日報を軽く自動化しましょう！ なんかしらコードを書いたらコミットすると思います。コミットのログ=行った業務のログですね！！！！！！！ つまりgit logで全部解決するわけです。会社でsvnを使ってる場合でも、git-svn使えば解決です。 $ git log --since=yesterday --author=hisaichi5518 --pretty=format:"- %s" こんなの毎回打つのだるいので、.bashrcにaliasを書きます。 alias nippou_='git log --since=yesterday --author=hisada --pretty=for
Plack::Middlewareの使い所 - Articles Advent Calendar 2011 Casual
2011-12-08 00:40追記 @karupaneruraさんに指摘されて、s/Plack::Middleware::Conditionals/Plack::Builder::Conditionals/ しました。ありがとうございます。@kazeburoさんすみませんでした。 こんにちは。Songmuです。鎌倉の面白法人でPerlでソーシャルゲームの開発をおこなっています。 「ぼくらの甲子園熱闘編」や「ぼくらのワールドリーグ」の開発に携わっております。 アプリはArk + DBIx::Class + Text::MicroTemplate::Extendedという構成で作ることが多いのですが、 今回はソーシャルゲーム開発で活用しているPlack関連モジュールを2つ紹介させていただきます。 ちなみにArkのadvent calendarもやっておりますので、併せて読んでもらえると嬉しい
かゆいところに手が届くマイナーCPANモジュールランキング - Articles Advent Calendar 2011 Casual
use strict; use warnings; print << 'PERL_ADVENT_CALENDAR_JAPAN_2011_DAY_7'; こんばんわ！こんばんわ！id:karupaneruraです！ Perl Advent Calendar Japan 2011の7日目を書かせて頂きます！お手柔らかに！ さてさて、みなさんCPANモジュール使ってますか？使ってますよね？僕は大好きです！ そんな、みんな大好きCPANモジュールの中から僕が独断と偏見で選ぶ、 『かゆいところに手が届くマイナーCPANモジュールランキング』を作ってみました！ 5位. Perl::MinimumVersion マイナー度 *** 使える度 **** 面白い度 **** 何番煎じ度 *** かっこいい度 **** これはPerlスクリプト、あるいはモジュールがどのバージョン以上で動作するかなどを調べるた
配列操作をカジュアルに - Articles Advent Calendar 2011 Casual
こんにちは。新潟在住Perl人、neko_gata_sです。AdventCalendarの敷居を下げにきました。ものっそいカジュアルな話をします。今日はList::Utilについて書こうと思います。 どちらが良いコード？ さて、いきなりですが、以下のふたつのコードを比べてみてください。 use strict; use warnings; my @shugo_charas = qw/ran miki suu dia/; my @shugo_charas_uc; foreach my $shugo_chara (@shugo_charas) { push @shugo_charas_uc, uc $shugo_chara; } use strict; use warnings; my @shugo_charas = qw/ran miki suu dia/; my @shugo_charas_
CGI::Expand - フラットなハッシュをネストデータに変換 - Articles Advent Calendar 2011 Casual
こんにちは、こんばんはおはようございます。nihenです。 自分のよく使っているモジュールであまり他で紹介されていないものって何かなーと探していたらCGI::Expandはあまり紹介されてないなと思ったので紹介します。 CGI::Expandという名前がついていますが、CGI.pmやCommonGatewayInterfaceとはそんなに関係がありません。 このモジュールの使いどころですが、httpのリクエストにおけるパラメータの受け渡しは key=value&key2=value といった、フラットなハッシュデータなわけです。ただしよく配列を表すのに key=value&key=value2&key=value3 といったデータで受け渡しを行うことがあります。こういったデータに対してしてCGI.pmの->paramはArrayRefを返すようになっていますし、Plack::Request
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://atnd.org/events/22658
カジュアルにperlデバッガを使って捗る - Articles Advent Calendar 2011 Casual
