さくらのレンタルサーバーライトプランでCPANモジュールをインストールするためのスクリプト - Perl入門ゼミ
Perl › Mojolicious さくらのレンタルサーバーライトプラン(月額125円)でCPANモジュールをインストールするためのWebアプリケーション(CGIスクリプト)を書きました。さくらのレンタルサーバーライトプランでは、SSHやTelnetを使えないために、CPANモジュールのインストールは障壁の高いものになってはいますが、このツールを使うとあら簡単に、Webブラウザ上からモジュールをインストールすることができます。 Windows上でMojoliciousの開発を始めて、さくらのレンタルサーバーで公開するまでの手順と同じ手順でさくらのレンタルサーバー上にFTPでアップロードしてください。app.cgiのパーミッションは755にする必要があります。 ディレクトリ構成は以下のようにします。 sakuracpanm - app.cgi モジュールのインストールはテキストボックスにモ
CGI::Application::Dispatchまとめ : おまえのログ
ここ1ヶ月ほど(ながいなぁ…)、ちまちまと勉強してきたCGI::Application::Dispatchについて、使い方もこなれて来たので、ここいらでひとまとめです。 何するモジュール？ この勉強中エントリーの１回目でも書きましたが、CGI::Applicationを利用したアプリで必要になるインスタンスCGIは作らずに、URI(PATH_INFO)から実行するモジュールとRunモードを決定する、というモジュールです。newしてrunするだけのインスタンスCGIなんか毎回書きたくないよ、というのがモジュール作者さんの意図のようです(PODにもあります)。 URIはこうなる CGI::Application::Dispatchを使った場合のURIは、 となります。 CGI::Applicationを継承したMyApp::Indexというモジュールを作った場合、それを実行するためのURIを比
AnyEvent::Twitter::Stream
NAME AnyEvent::Twitter::Stream - Receive Twitter streaming API in an event loop SYNOPSIS use AnyEvent::Twitter::Stream; my $done = AE::cv; # receive updates from @following_ids my $listener = AnyEvent::Twitter::Stream->new( username => $user, password => $password, method => "filter", # "firehose" for everything, "sample" for sample timeline follow => join(",", @following_ids), # numeric IDs on_tw
Perlで日付・時間を操作 - DateTime モジュールの使い方 (iandeth.)
Perlには、日時の加・減算を扱うモジュールが標準でついてきません。僕の仕事場ではずっと、同僚が作ったオリジナルモジュールを皆で使いまわしていたのですが、今になって、世間的 (CPAN) にはどんなものがあるのか気になって調べてみました。※参考になったのは miyagawa 氏のメールマガジンの過去記事と、perl.com の The Many Dates and Times of Perl なるエントリでした。 今回は数ある日付関連モジュールの中から、Dave Rolsky氏の DateTime モジュールについて、その基本的な使い方について簡単にまとめたので共有してみます。 同氏は上記 perl.com 記事の執筆者であり、この前の YAPC::Asia で DateTime project について講演してくれていた人です。気合の入ったモジュールを作ってくれた事に感謝。 目次 基本
DateTime - モダンなPerl入門 - モダンなPerl入門
日付の取り扱い 何かと面倒な日付処理には DateTime.pmをつかいます。 生成 use strict; use warnings; use DateTime; #日付を指定して生成 $dt = DateTime->new( time_zone => 'Asia/Tokyo', year => 2008, month => 8, day => 4, hour => 15, minute => 0, second => 0 ); #epochから生成 $dt = DateTime->from_epoch( time_zone => 'Asia/Tokyo', epoch => 1217829600 ); #現在の日付(時間ふくむ) $dt = DateTime->now( time_zone => 'Asia/Tokyo' ); #現在の日付(時間含まない) $dt = DateTime
CPAN の ダウンロード先（URL リスト）を変更する方法
「Sun Fire V20z を Webサーバ用に購入」や「Apache bench 対決 ： Xeon vs Opteron」の記事で書いたように、本業で使っている web サーバは Sun Fire V20z というサーバなんですが、Dell の Xeon サーバとかに比べてベンチマークで比較する数値以上に実務アプリ（Web + DB サーバアプリケーション）の動作がすこぶる機敏です。 ってな訳で、再びサーバ増設で Sun Fire V20z を購入してインストール作業をしているのですが、CPAN のインストールで苦戦中。どうも CPAN サーバによって MD5 - checksums で転けてしまうんです。具体的には、
TokuLog 改め だまってコードを書けよハゲ - ドコモでも CSS を外部参照を使える HTML::DoCoMoCSS をリリース
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
XML::LibXML - モダンなPerl入門 - モダンなPerl入門
XML のパーズ・作成 XML のパーズ・作成には、XML::LibXML がオススメでしょう。高速で安定して動作します。 XS を利用できる環境ならば、これがベストの選択肢です。 作成する use strict; use warnings; use XML::LibXML; my $dom = XML::LibXML::Document->new(1.0, 'utf-8'); my $root = $dom->createElement('html'); my $head = $dom->createElement('head'); my $title = $dom->createElement('title'); $title->appendText("test"); $head->appendChild($title); $root->appendChild($head); $dom
[Perl] XML::FeedPP - RSS・RDF・Atomフィードの解析・生成・変換・結合
Kawa.netxp [Perl] XML::FeedPP - RSS・RDF・Atomフィードの解析・生成・変換・結合 XML::FeedPP モジュールは、 RSS 2.0、RSS 1.0 (RDF)、Atom 0.3（および1.0）フィードの XML ファイルを解析・生成・変換・結合するための Perl モジュールです。 RSS ベースの1種類の共通 API で RSS・RDF・Atom の各フォーマットの処理に対応しているため、 手軽に扱えます。 フィードの読み出し・書き込みはもちろん、 RSSからRDFへ、RDFからAtomへといった各フォーマット間の相互変換も可能です。 他サイトからダウンロードした複数のファイルを結合して、 まとめて1つのファイルとして出力することもできます。 公開版アーカイブ： XML-FeedPP-0.43.tar.gz TARGZ CPAN ←通常パッケ
OpenIDを使ってみよう
はじめに OpenIDは最近非常に注目が高まっている認証技術の一つです。ここでは、OpenIDを利用したPerlのサンプルを通じてOpenIDのメカニズムに触れていきたいと思います。 必要な環境 Perl 5.8以上が動作する環境が良いと思います。基本動作の確認はMac OS Xを利用しました サンプルの紹介 早速サンプルコードの「openid-test.cgi」を見ることにしましょう。このサンプルはOpenIDを利用した簡易ログインページです。 #!/usr/bin/perl use strict; use warnings; use CGI; use Net::OpenID::Consumer; #use LWPx::ParanoidAgent; use LWP::UserAgent; my $query = CGI->new; $query->charset('utf-8'); my
パスワード設定をコードに書かない(Config::Pit) - モダンなPerl入門 - モダンなPerl入門
パスワード設定をコードに書かないようにするには Config::Pit をつかいます。 なぜ必要なの？ アカウント情報が必要なWebサービスを利用するスクリプトを作るとき、アカウントやパスワードをスクリプトのコードに直接書き込むと（ハードコーディング）、そのスクリプトがほかの人に見られてしまうことによりパスワードが漏洩してしまいます。 Config::Pitは、外部ファイルにWebサービスのアカウント情報を格納しておき、スクリプト側で必要なときに、読み出しできるようにします。これにより、スクリプト内にアカウント情報をハードコードすることがなくなり、スクリプト単体でのパスワード漏洩が防げます。 例：コードを配布しようとして、 #!/usr/bin/perl use strict; use warnings; use utf8; use Encode; use WWW::Mechanize;
Config::PitとWeb::ScraperとPlaggerで24時間365日のゲーム監視体制
序文 趣味のネットウォッチのために仕方が無く超便利なPerlを覚えようという感じの otsune です。そんなわけでコーディングの深い話はよくわからんので、今回はPerlとCPANを使ってネットウォッチを支援する手法について書きます。 ウォッチしたいWebページを機械的に監視できれば、あとはPlaggerなどの便利ツールを使って「メールを出す」「im.kayac.comでメッセンジャーにアラートを出す」「ピザを注文する」など好きな処理をすることが出来ます。 RSSフィードやAPIなどがあるWebサイトであれば特に苦労はしないのですが、今回取り上げるOgame.jpはウェブブラウザーゲームなので、フィードなど便利な機能はまったく存在しません。 そこでウォッチしたいWebページに対してWeb::Scraperを使ってYAMLを出力する短いスクリプトを書いてしまいます。 メールを出すなどのこまご
INSTALL - DBD::mysqlのインストールと構成設定の方法
名前¶ INSTALL - DBD::mysqlのインストールと構成設定の方法 概要¶ perl Makefile.PL [options] make make test make install 説明¶ このドキュメントは、MySQLデータベースのためPerl DBIドラバである DBD::mysqlのインストールと構成設定について説明します。 読み進めるまえに必要なものが利用可能になっているかどうかを 確認してください：Perl、MySQLそしてDBI。詳細については別のセクション "必要条件"をご覧ください。 あなたのPerlのバージョンによりますが、DBD::mysqlの バイナリ・ディストリビューションを利用することができかもしれません。 もし可能であれば、これをお勧めします。そうでなければソースから インストールする必要があります。そうだとすれば、間違いなく Cコンパイラが必要
Perl 5.8.x Unicode関連
-> 趣旨と注意書き -> UTF8フラグ？ -> UTF8フラグとPerlIOレイヤ -> UTF8フラグのついた文字列を記述する -> Wide character in print ... -> Encode -> utf8::* -> use utf8; -> use encoding; -> use UTF8 と use encoding -> JcodeからEncodeへ -> 情報源 <- モドル 趣旨と注意書き Perl 5.8.x のUnicode 関連です。 正直、5.8.x は、ネタでしか使ってなかったので(ぉ、ちゃんといじったことがありませんでした。 使ってみると、よくわかんなくなったので、ちょっとまとめてみました。 今でもあんまりわかってないかもしれないので、内容は無保証です。 突っ込み歓迎。 Jcode、Encodeのメンテナの弾さんから、ご指摘いただいたので、
自作pmをuse libする - 半径5メートル
下にlibとかつくってそこにおいた自作pmをuseするとき、相対パスで呼び出してしまうと実行ディレクトリが違う場合（cronでまわしたりとか）に都合が悪かったりします。 そこで、以下のようにBEGINブロック内でスクリプト自身のパスをとってきてからuse libとかしてるんですが、このやり方おかしかったりしないんだろうか。もし、もっとこうした方がいいとかあればぜひお教え下さい。 ├ main.pl ├ lib └ Hoge └ Foo.pm#!/usr/bin/perl use strict; use warnings; use File::Basename; my $w_dir; BEGIN { $w_dir = dirname $ENV{_} } use lib "$w_dir/lib"; use Hoge::Foo; my $foo = Hoge::Foo->new("tester0
Jifty::Manual::Tutorial - Zero to Jifty in a Jiffy
題名 Jifty::Manual::Tutorial - あっという間にゼロからJifty 説明 このチュートリアルを読めば、Jiftyではじめてのアプリケーションを構築するにあたって知っておくべきことはすべてわかるはずです。 使い方 必要なもの ここでは――少なくともこのチュートリアルの執筆時点で――インストールしておくべきものを紹介します。 Jiftyのインストール そんなに構えなくても大丈夫。私たちはDRY (Don't Repeat Yourself) の原則をとても大事に思っていますし、だからこそPerlやCPANを愛しているのですから。JiftyはCPANのすばらしいコードをたくさん利用しています。直接依存しているCPANパッケージは全部あわせて60にもなりましたが、そのほとんどはクロス・プラットフォームなピュアPerlパッケージですから、Perlを利用できるプ
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
IBM Developer
http://www.multiburst.net/project-multiburst/archives/2006/06/19/2245.php
Consumerの実装を知り、OpenIDを使ってみよう ― ＠IT
Perl の MVC フレームワーク Catalyst に入門してみた : NDO::Weblog: