Perl
Googleのブログ検索にPingを送る - GIGAZINE APIも公開されているので誰かに全自動の方法を作って欲しいかも。 みてみたらただのweblogUpdates.extendedPingだった。 Perlならこれで。 use XMLRPC::Lite; my $ping_url = 'http://blogsearch.google.com/ping…
フォト蔵APIのモジュールを作ってみた。 WebService-PhotoZou-0.01 - Easy-to-use Interface for PhotoZou Web Services - metacpan.org 使い方とかはPODとかtestとか参照。 APIはRESTとのことなんだけど、ちょっと微妙かなぁという印象。REST的に考えるなら…
Perl Hacksで紹介されていたので試したモジュール。 Perl Hacks: Tips & Tools for Programming, Debugging, And Surviving (Hacks)Damian Conway Curtis Poe Chromatic Oreilly & Associates Inc Amazon.co.jp で詳細を見る Pod-Webserver-3.11 - Minimal w…
Cache-Memcached-XS-0.01 - client library for memcached (memory cache daemon) using libmemcache - metacpan.org libmemcache を使って書かれた Memcachedのインターフェース。使い方はほぼ Cache::Memcached と同じっぽい。 速度にどのぐらい差が出るか…
最速インターフェース研究会 :: JavaScriptでPythonのsetみたいなの そういえばPerlにもSetないなぁと思ってCPAN探したら発見。http://search.cpan.org/dist/Set-Object/一通りのことは出来る模様。 で、SetでJavaが懐かしくなって、APIを久しぶりに眺めてた…
AnyLoader-0.04 - Automagically loads modules for fully qualified functions - metacpan.org モジュールを明示的にuseしなくても使えるようにしてくれる。CPANモジュールを使ってるとuse行だけで10行とかいっちゃうことがよくあるけど、これを使うと書か…
CPAN Recent Changesを読んでたら、Bestっていうモジュールが目に留まった(名前が派手なので)。何をするモジュールなのか見てみると、こんなことをしてくれるらしい。 use Best qw(YAML::Syck YAML);とすると、前に書いたものから順番にロードしてみて、うま…
Text-Migemo-0.01 - Migemo library module for Perl - metacpan.org MigemoをPerlから使うモジュール。前からほしいと思ってたので作ってみた。中身はほとんどC/Migemoのラッパー(with XS)。 一応サンプルはこちら。http://spiritloose.net/misc/text-migem…
そういえば、作ってみた。 Apache-ClearSilver-0.01 - Apache/mod_perl interface to the ClearSilver template system. - metacpan.org テンプレートエンジンだけ使いたい場合にお手軽。 関係ないけど、Apache::TestでTest書くのが意外と楽しかった。便利便…
使っているRSSリーダでこの日記の更新がちょっと遅かったので、ちょこっと作ってみた。 #!/usr/local/bin/perl use strict; use warnings; use XMLRPC::Lite; my $name = 'spiritlooseのはてなダイアリー'; my $uri = 'http://d.hatena.ne.jp/spiritloose/';…
ClearSilver 用の Catalyst::View、Sledge::Templateを書いて、CPANにあげてみた。 Catalyst::View::ClearSilverSledge::Template::ClearSilver 一応、前回 書いたような感じで、Perl のデータ型を HDF Dataset に(適当に)変換するようにしてあるので、素で…
ClearSilverネタが続いてるわけだけど、今度はPerlバインディングを使ってみた。 ClearSilverをインストールすると同時にPerlバインディングもインストールされるんだけど、PODには何にも書いてない・・ここにAPIがのってるだけ。 というわけでサンプルは以…
高木浩光＠自宅の日記 - 飾りじゃないのよCAPTCHAは 〜前代未聞のCAPTCHAもどき, CAPTCHA機能の発注仕様をどうするか うーん。これはひどい。 製造過程を想像するとかなり悲惨。数字の画像も手で作ったのかなぁ？ というわけで、ライブラリを使いましょう。 …
Plagger::Plugin::Notify::NetSend 作ってみた。なんか最近やたらと Plagger::Plugin ばっかり書いているような・・・ Windows の NET SEND コマンドみたいに通知出来る。ソースは以下。
livedoor ブログ検索とかは検索結果のRSS吐いてるけど、Google の検索結果もFeed として扱いたいなぁ。ということで Plagger::Plugin::CustomFeed::GoogleSearch 作ってみた。ソースは以下。
昨日の Notify::YahooMessenger に続いて、今度は Publish::Excel を作ってみた。1 Feed を 1 シート に保存する。 Excel だと見た目仕事してるっぽいので、うるさい会社にいる人はこれ使って livedoor Reader or Bloglines → Excel で見たりすると怒られな…
Plagger::Plugin::Notify::YahooMessenger。Yahoo! Messenger で 更新を通知。 もうあるのかな？？(Net::YahooMessengerのメンテナ miyagawa さんだし・・・)見当たらなかったので一応。 (あったらすんません。) package Plagger::Plugin::Notify::YahooMess…
Plagger で 更新された CPAN モジュールをインストールしてみる。Plugin を 作りたかったけど、どのフェーズでやるべきか悩んだので、ありもので強引にやってみる。どうやるのがいいのかな？Publish は違う気がする。 Feed は http://search.cpan.org/upload…
Smart::Comments っていう便利なモジュールがある。Smart-Comments-1.06 - Comments that do more than just sit there - metacpan.org あんまり有名じゃないのか、検索してもあまり検索結果件数が多くないので紹介してみる。 だいぶ前にこちらのエントリー…
my $foo = Foo->new; print "$foo->bar"; # NG!みたいなことをしたいことが何回かあって(楽したいがために)、いままで我慢して外に出してたけど、調べることにした。 結果は print "@{[$foo->bar]}"; print "${\$foo->bar}";こんな感じ。無名リファレンスを…
http://unknownplace.org/cpanrecent/ で見かけた。 http://search.cpan.org/dist/Bundle-Modules/なんだこれ？ありえねぇ・・・ モジュール(っていうかモジュール名羅列してあるだけだけど)としても？だけど、Build.PL がすごい。 'VERSION' => Date::Forma…
http://blog.livedoor.jp/dankogai/archives/50502585.htmlなにやら use strict を推奨しない本が最近でたらしい。 use strict しなくても許されるのはワンライナーぐらいじゃないかな。 find . -type f -exec perl -i -pe 's!/usr/bin/perl!/usr/local/bin/…
だいぶ前に作って放置してたやつ。id:secondlife さんの iar - ActiveRecordを使った対話型のSQLクライアント - 2nd lifeを見てClass::DBIでも作って(パクって)みた。Class::DBIだと、標準でActiveRecord みたいに便利じゃないので、あんまり意味ないかも。…
遊びで Pugs を使ってみてる。以下は Hello World!! までのメモ。 結構前なので今はバージョンが違うかも。
