NAME Flickr::API - Perl interface to the Flickr API SYNOPSIS Using OAuth to call a method not requiring authentication use Flickr::API; my $api = Flickr::API->new({ 'consumer_key' => 'your_api_key', 'consumer_secret' => 'your_app_secret', }); my $response = $api->execute_method('flickr.test.echo', { 'foo' => 'bar', 'baz' => 'quux', }); my $config_file = $HOME/saved-flickr.st; $api->export_storable
This module is a Perl-only implementation of the cryptographic cipher block chaining mode (CBC). In combination with a block cipher such as DES or IDEA, you can encrypt and decrypt messages of arbitrarily long length. The encrypted messages are compatible with the encryption format used by SSLeay, and can be made compatible with the newer OpenSSL package by specifying the -salt argument. 先の XML.co
カテゴリー"Acme" CPANには大量のPerlモジュールが登録されています。暗号操作、Apacheとの連携、テキスト処理、データベースへの接続、MIDIやPDFファイルの操作等々、ありとあらゆるモジュールがプログラミングの手助けをしてくれます。これらは全てカテゴリー別に分類されています。例えば、今あげた暗号関連のモジュールなら"Crypt"に属しますし、テキスト処理に関するものは"Text"という具合です。 このなかでも、"Acme"というカテゴリーには大変素敵で野心的なものがたくさんあります。いくつか紹介してみたいと思います。 Acme::Damn さて、Perlでオブジェクト指向プログラミングを行なう場合、blessという組み込み関数を使います。 bless $object,MyClass; で、blessというのは「祝福」という意味でしてTRPGやってた人にはお馴染みですね。CP
ThinkITに「SledgeによるWebアプリケーションフレームワーク入門」を書かせて頂きました。今回から数回にわたってWebアプリケーションについて紹介しながら、Sledgeではどう実現するのかについて、にぽたん研究所な人、#!shebang.jpな人 、自分の三人で書かせて頂く予定です。 この連載では、主題が「Webアプリケーションフレームワーク」なのでSledgeの詳しい説明を盛り込んでいません。そこで、この際なのであちらでは書ききれなかったSledgeの設定方法についての説明をこのページで書こうかと思います。 とりあえずSledgeを使ってページが表示できるまでを書いていきます。 途中で挫折したらすみません…。 今回の目標としてhttp://sledge.example.com/index.cgiにアクセスをしたら Hello World と表示するだけのアプリケーションを作成す
RSSとは? RSSとはRich Site Summaryの頭文字をとって略された名称で、実体はXMLです。Resource Description Framework (RDF)に基づいたRSS 1.0では、RDF Site Summaryの頭文字をとったものとされています。また、RSS 0.9系の後継として、RSS 1.0とは別に開発されたRSS 2.0では、Really Simple Syndicationの頭文字をとったものとされています。 サイトの見出しやリンク、要約などを定型に従って記述でき、ウェブサイトのコンテンツ一覧や、ヘッドラインなどに利用されています。 XML形式なため、プログラムなどからも柔軟に扱うことが出来るので、一種のデータベースとしても活用でき、過去のドキュメントの内容をRSS形式で保存し、それを検索して必要な情報だけを抜き出すなどということも可能でしょう。 M
目次 はじめに Yuki::RSS解説 Yuki::RSSモジュール リンク 更新履歴 ぜひ、感想をお送りください はじめに Yuki::RSSは、YukiWiki用に作成した小さなRSS生成モジュールです。 日記スクリプトなどでRSSを生成したいけれど、 XML::RSSを使うのはちょっと大げさかも、というときに便利です。 Yuki::RSS解説 名前 Yuki::RSS - RSS 1.0を生成する最小のモジュール。 XML::RSSにバックワードコンパチブル。 使用例 use strict; use Yuki::RSS; my $rss = new Yuki::RSS( version => '1.0', encoding => 'Shift_JIS' ); $rss->channel( title => "Site Title", link => "http://www.examp
RSSの構文は簡単ですが、更新情報などを毎回別途RSSとして記述するのは億劫です。簡単なスクリプトで、RSSを自動生成しましょう。 以下のPerlスクリプトは、更新情報のページが定義型リスト(dl,dt,dd)で記述され、dt要素の中に新着ページへのリンクが記述されているという例を想定しています。ご自身のスタイルに合わせて、適宜書き換えて利用してください。 (例) $item_title = "dt"; #タイトルとリンクを抜き出す要素 $item_descr = "dd"; #説明文を抜き出す要素 $host = "http://your.domain"; #ソースからタイトル、リンク、説明文を抽出 while(<>){ if(m|<${item_title}.*?><a href="(.*?)">(.*?)</a>|){ $link[++$items] = $1; $items_lis
以前からClass::DBIでFactoryパターンを使えたらなーと思ってました。 たとえば、有料、無料、VIPのように複数の会員タイプがあるような会員サイトを作る場合、Class::DBIを継承したMyService::MemberがFactoryとなり、会員のタイプによって、MyService::Member::Basic, MyService::Member::Free, MyService::Member::VIPというようなサブクラスのインスタンスを作成するというようなイメージです。 さらにFactoryクラスでMyService::Member->retrieve_allとかすると、適切なサブクラスのインスタンスのリストがとれると最高です。 そんなことができないかなーとClass::DBIのドキュメントやソースを眺めていたんですが、Class::DBIに組み込まれているsele
この他に、日本語の情報としては、川合さんの河馬屋二千年堂でCGI::Applicationモジュール v.1.2 の和訳ドキュメントを見ることができます。上記の4.04版のドキュメント和訳にあたっても、参考にさせていただきました。 CGI::ApplicationモジュールのSYNOPSISにあるサンプルでは、CGIファイルとモジュールを"webapp.cgi"と"WebApp?.pm"の2ファイルに分けています。 実際のアプリケーション作りではこうなっていたほうが(再利用性や柔軟性などから)良いと思いますが、ちょっとCGI::Applicationを試してみるなどという時には、ライブラリパスなどを考えなくて済むように、1ファイルにまとめたいと思うこともあります。この時は、単純に次のようにするだけで実現できます。 !#/usr/bin/perl ### 元"webapp.cgi"の内容..
名前¶ Class::DBI - シンプルなデータベース抽象クラス 概要¶ package Music::DBI; use base 'Class::DBI'; Music::DBI->set_db('Main', 'dbi:mysql:dbname', 'username', 'password'); package Music::Artist; use base 'Music::DBI'; Music::Artist->table('artist'); Music::Artist->columns(All => qw/artistid name/); Music::Artist->has_many(cds => 'Music::CD'); package Music::CD; use base 'Music::DBI'; Music::CD->table('cd'); Music::C
今日わかったperlの不思議。 perl でモジュールを use しますが、時としてクラス名を動的に生成して use したい時があります。 そんなときは以下のようにします。 my $class = "Foo::Bar::$baz"; eval qq(require $class; import $class); よくやる間違いは、 my $class = "Foo::Bar::$baz"; eval { require $class; import $class }; これをやっても use されないようだ。この eval の用法はエラーをトラップしたりするときに使用するものです。最初の例は、引数を perl の構文として評価するもの(だと思っている…) ようは、eval EXPR はシンタックスエラーを実行時に $@ に返すのに対し、 eval BLOCK はシンタックスエラーをコンパイ
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く