はじめに　ご存知の通り、携帯端末には現在地の位置情報を基地局ベース、もしくはより精度の高いGPSを使用して送信する機能がついています。この機能を使用して、現在いる場所の地図を表示したり、最寄り駅を表示したりするサービスが各社から提供されています。　位置情報の送信・取得方法はキャリアごとに異なりますが、仕様さえ理解すれば個人で運用しているサイトにも簡単に導入できます。まだ試したことのない方は、この機会にぜひお試しください。対象読者　PerlでCGIアプリケーションを作成したことがあり、位置情報を利用したい方。必要な環境　Perl 5.8以上が動作する環境。iモード 「オープンiエリア」　ドコモが提供する基地局ベースのエリア送信サービスで、すべてのiモード対応端末で利用できます。「NTTドコモ　作ろうiモードコンテンツ：オープンiエリア」で仕様が公開されています。　下記のパラメータをドコモの位

（「Perl で Exif を扱う」のつづき） Xcode を使って、 Perl スクリプトに AppleScript の GUI を付けてみて、そこそこうまくいったので忘れないように、いや、忘れるので、忘れないうちにメモ。 AppleScript から do shell script という命令を使うと、 UNIX コマンドを起動する事ができる。コマンドが起動できるということはつまり、なんでもできるということになるかしら？　それはさておき、その仕掛けを使えば、無愛想なコマンドライン・ツールであった Perl スクリプトに GUI をかぶせて Mac OS X 用のアプリケーションに仕立てる事もできる。 Objective-C を使わなくとも（いえ、知らないんです） Perl （や他の言語でもいいけどそれら）と、少しの AppleScript の知識があれば、それっぽいものが「手軽に」でき

TripletaiLとは TripletaiLは、プログラミング言語であるPerlで日本語のWebアプリケーションを構築するためのフレームワークです。 安全性、生産性、保守性という三つの要素を重視しており、少人数での開発に適する形で設計されています。 本フレームワークはオープンソースとして、meta::cpan上で公開されています 安全性 セキュリティに配慮した設計がなされており、これに関連する機能を備えています。 テンプレートへの文字列展開やフォームへの値の埋め込み時に、自動で <> などの文字をエスケープします。 DBへのSQL実行におけるプレースホルダはもちろんのこと、CSRFを防止する機能や、セッションにおいて同一ドメイン上HTTP/HTTPS両方の領域で安全かつ領域をまたいでも安全に扱うことが可能なdoubleモードといった機能があります。 生産性 TripletaiLは日本製で

CPAN::Mini で CPAN のミラーをローカルに DECON で話してきたネタですがちょっと詳しく。 飛行機やら電車の中やらでオフラインハックするときに（たまに）問題になるのが CPAN モジュールの不足です。「あぁ、このマシンにはあのモジュール入ってねぇ～」とかでハックが滞るのは萎えます。というわけで minicpan。CPAN::Mini というモジュールで、CPAN モジュールの最新版だけを持ってきてミラーをつくることができます。 導入は簡単で、CPAN から install CPAN::Mini すると minicpan というコマンドが付属してきます。コマンドラインから使うには、 > minicpan -r http://ftp.funet.fi/pub/languages/perl/CPAN/ -l ~/minicpan とかすれば finet から HTTP で同期で

Yahoo!APIを使ったアダルトページ判定 2006-09-09-2 [YahooHacks][Asamasearch] Asamasearch で使っている、 アダルトページ判定ロジックの解説を書いてみました。 参考：Yahoo!デベロッパーネットワーク (YDN) http://developer.yahoo.co.jp/ ちなみに、「my %seen;」からの5行は「Perl クックブック」に載っている よく知られたイディオムを改変して使ってます。 それではどうぞ： ■■■アダルトページの判定 ヤフー検索にはアダルトページフィルタ機能があります。 Yahoo!検索APIにおいてパラメータ adult_ok を 1 にすると、 アダルトコンテンツ入りの、 0 にするとアダルトコンテンツなしの検索結果になります。 デフォルトは 1 です。 この機能を使って、

Plagger って何ですか？

_ Debian に Plagger をインストール Plagger をインストールしたので覚え書き．CPAN でのモジュールインストールを挫折した人なので，ここはちょっと楽して公開されているレポジトリを使ったお手軽環境構築について． まず，レポジトリを利用するに当たっては，stable な環境では利用できないんで，unstable な環境を，sarge　上に作ることから．これも別に難しいこともなく，debootstrap を利用して簡単に構築できる．今回は，いったん stable な環境を作ってから，unstable に dist-upgrade する手順で． まずは，debootstrap　コマンドで環境を作ります．コマンド一発であとはおまかせ． # mkdir /debian-sid # debootstrap sarge /debian-sid インストールが完了したらとりあえず，

What is Clearsilver? Clearsilver is a fast, powerful, and language-neutral HTML template system. In both static content sites and dynamic HTML applications, it provides a separation between presentation code and application logic which makes working with your project easier. The design of Clearsilver began in 1999, and evolved during its use at onelist.com, egroups.com, and Yahoo! Groups. Today ma

A few months ago, I wrote Ruby Book Sales Pass Python. Well, in his talk at OSCON on Friday, Roger Magoulas, the director of O'Reilly Research, revealed that they've now passed sales for Perl books as well. Here's his graph (click on it to pop up a larger image): As described in my posting Book Sales as a Technology Trend Indicator, data is from Nielsen Bookscan's point of sale reporting on sell-t

iandeth. Perl, Flash ActionScript, MySQL, Movable Type, システム開発 - そんなテーマのサイトdeth. p.32 [参考] 他のプログラミング言語では、変数宣言は宣言に含まれることが多いですが、Perlには変数宣言という概念がありません。Perlは変数が最初に評価された時点で領域を確保します。Perlと他のプログラミング言語で大きく異なるのがこの変数宣言機能の有無であり、見通しの悪い複雑なスクリプトを書いてしまう主因でもあります。 最初のイントロダクションの章でそんな風に書かれています。これを読んだプログラミング初心者の人達はきっと「えぇ？そうなの？Perl使いにくそうだなあ」と思ってしまいますよね、きっと。そしてさらには・・・ p.104 strict プラグマは、Perlスクリプトでの記法を厳密にするためのプラグマです。 (中略

MySQLデータベースのダンプファイルをzipアーカイブして、メールサーバに送る、わりとアリガチなスクリプトを必要に迫られて書いたのでついでに公開。 mysqldump2email.ja JP - Ogawa Code mysqldump2email - Ogawa Code (English) 手前味噌だけど結構便利。ダンプデータを平文メールで送るのに抵抗を感じるので、zipのencryption機能も使えるようにしてある。1時間おきに意味なくダンプしたりすると、Gmailのスプールと言えどもみるみる埋まっていってユカイ。 例によって試してはいないけど、Gmailの30日でexpireするTrash機能と組み合わせると、バックアップとしての実用度がさらに高まるかもしれないと思った。例えば、 username+daily@gmail.com宛に毎日ダンプする。Gmailの設定でこのアドレ

お仕事でレンタルサーバー上でCGIを書く羽目になったのですが、root権限はおろかシェルも使えない環境なのでCatalystにどっぷりつかっていたボクとしては面倒くさくて気が狂いそうです。 特にDB周り。 DBI直たたきなんて非人間的な作業をやっているとバグつぶしだけで頭がおかしくなりそうです。 で、なんとかClass::DBIだけでも使えないか調べて見ました。 CDBIが依存しているクラスでXSを使っているのはversionとCloneだけです。 それならある程度環境が整っているレンタルサーバーならなんとかなるだろうってことで調べて見ると、都合のいいことにversionは--perl_onlyオプション付きでMakefile.PLすればPure Perlなクラスを作成してくれるし、CloneはClone::PPなるPure PerlなCloneクラスがありました。 で、やってみました。

はじめに　PerlでCGIアプリケーションを作るフレームワークの1つが、CGI::Applicationです。CGI::ApplicationにはどのようなCGIアプリケーションにも必ず存在する定型処理があらかじめ用意されており、自ら記述するコードの量を減らすことができます。また、プラグインによって、足りない機能を補えます。本稿では、CGI::Applicationとデータベースを用いた基礎的なCGIアプリケーションの実装方法を解説します。対象読者Perlで何らかのCGIアプリケーションを作成したことのある方。CGI、DBI、HTML::Templateモジュールを使用したことのある方。フレームワークを使用したことのない方。 動作環境　Perl 5.8以降を使ったCGIアプリケーションが正しく動作するWebサーバが必要です。また、以下の依存モジュールをCPANで導入しておいてください。