[perl] CGI・PerlプラグラムはEUCコードで書く

▶ in perl posted 2010.12.29 Wednesday / 23:45

perlの覚書です。

つい最近までプラグラムファイルの文字コードに気は使ってませんでした。
SereneBachのプラグインを開発している時も文字化けは発生しましたが強制的に文字コードを変換して対処していました。
が、どうやらperlはEUCコードで書くと文字化け等発生がしにくいとのこと。
さらに、改行コードはLFにした方がいい。
サーバーはUNIX系が多い為、その対処法?らしい。

だが、Windowsに付属のメモ帳では文字コードも改行コードも指定できないので
私は、TeraPadを愛用しています。
シンプルで動作軽快が売りなので気に入っています。

[SB Plugin] FeedBurnerプラグイン v0.01 リリース

▶ in SereneBach > Plugin posted 2010.12.29 Wednesday / 23:38

超オレオレプラグイン第2弾のFeedBurnerをサポートするプチプラグインです。


本プラグインは、FeedBurnerのアドレスを入力することにより既存のタグ {site_rss} をFeedBurnerのアドレスに置き換えします。
おまけでフィード・カウントを表示する独自ブロック "feedburner" "feed_count" を追加するだけというプラグインです。

良ければダウンロードしてお使いください。

ご利用上の注意


当プラグインをご利用される前には、必ず付属の readme.txt をご覧ください。


次期バージョン


いずれFeedBurner APIを使用してレポートやグラフを管理画面に表示できたら良いかな?と思っています。



Download

[iPod touch] 携帯ホルダー

▶ in Apple > iPod posted 2010.12.25 Saturday / 23:34

iPod touchを愛車で聴くために専用の携帯ホルダーを購入しました。
ちょっと値が張りましたが¥1995で購入。
iPod touchにはELECOMのシェルカバーを付けていますがそれでもきちんとこの携帯ホルダーには吸着します。意外に便利!

だけど、ひとつだけ難点が・・・。
カーコンポで聴くためにLOGITECHのFMトランスミッター(初代iPod shuffleで使用)を以前から所有していたのだがこれをイヤホン端子につなげるととんがり部分に当たり縦にホールド出来なかった。
仕方なく横にしてホールドさせていますがちょっと使いづらい・・・。
AirPlay対応のカーコンポでも出ないかなー?



[SB Plugin] WHOIS検索プラグイン v0.01 リリース

▶ in SereneBach > Plugin posted 2010.12.24 Friday / 00:32

CGIハッカーズ・プログラミングを読んで作った超オレオレなプラグインです。


SereneBachの管理画面にてIPアドレスを入力してWHOISサーバーを選択後、検索ボタンを押すだけで結果を管理画面上に表示するというだけの機能しかありません。
アクセス解析と併用でほんの少し使えるかな?と思い作ってみました。

良ければダウンロードしてお使いください。
インストール方法などはダウンロードファイル内のreadme.txtを閲覧ください。

Download

[perl] CGI.pmを使って標準HTTPヘッダの出力

▶ in perl posted 2010.12.19 Sunday / 22:30

futomi's CGI cafe - CGI.pm を使ってみよう -

上記のfutomi's CGI Cafeで勉強しつつ最近上記の2002年発行のCGIハッカーズ・プログラミングを古本屋で手に入れたので覚書です。

perlのCGIを使ってHTMLの内容を吐き出す時は、「以下の内容(Content)の種類(type)はHTMLですよ」という前置きが必要になとの事。
CGI.pmを使わない時は、
print "Content-type: text/html, "\n\n";
で良いが
CGI.pmを使う時は、
print $q->header;
又は、
print $q->header(-type=>'text/html');
とする。
以上の3例の結果は同じになる。ただ、CGI.pm を利用するためには、Perlスクリプト上で、CGI.pm を下記の様に呼び出さなければならない。
use CGI;
更に、次の問い合わせオブジェクトの作成をしなければならない。
$q = new CGI;

まとめると以下の様になる。
use CGI;
$q = new CGI;
print $q->header;
PAGE TOP