del.icio.us と はてなブックマークに cross-post: blog.bulknews.net
del.icio.us と はてなブックマークに cross-post 思うところあってはてなブックマーク にもデータをポストしておこうと思い、del.icio.us とはてなにクロスポストするツールを書いてみました。http://svn.bulknews.net/repos/public/sbm-xpost/trunk/ からもってこれます。 del.icio.us API と はてなブックマーク API を使ってデータをポストしています。svn co したあと、sbm-xpost.yaml.sample を sbm-xpost.yaml にコピーして、del.icio.us とはてなのユーザ名、パスワードを書き込めば使えます（CPAN モジュールがいろいろ必要ですが）。 1. del.icio.us の投稿画面が tag が多いと IE で固まる 2. はてなブックマークを購読している
Template Toolkit Manual -テンプレートツールキット和訳マニュアル-
テンプレートツールキットマニュアル 職場でTTを使っていた時に少しずつ訳したものです。途中よく分からない所もあって、かなり適当。自動翻訳よりはマシかも、という程度です。 追記・修正歓迎。質問不可。→ しろいわ(public@hakoniwa.net) オリジナルマニュアル http://www.template-toolkit.org/docs/plain/Manual/Directives.html CPAN http://search.cpan.org/~abw/Template-Toolkit-2.14/ 概要 解説 テンプレート変数へのアクセス GET CALL SET DEFAULT 他のテンプレートファイル・ブロックの処理 INSERT INCLUDE PROCESS WRAPPER BLOCK 条件処理 IF / UNLESS / ELSIF / ELSE SWITCH /
Tips (CGI, Perl, Unix and etc.)
Tips 目次 Tips (CGI&SSI) ブラウザの表示を変化させない CGI スクリプト（Status: 204 No Content） 他の URI (URL) にジャンプする CGI スクリプト（Location フィールド） CGI のタイムアウトおよびブラウザの中断 CGIスクリプト中で重い処理をバックグランド実行 サーバによるタイムアウトを回避 サーバによるタイムアウトを回避＆重い処理の保護 SSI における HTML 出力の中断 CGI出力内容のコピーをファイルに出力 CGIによるブラウザでのダウンロード POST のサイズ制限 Content-Encodig による gzip 圧縮 Tips (Perl) flock の使い方 排他制御 実効 UID の切替え perl の setuid スクリプト perl の system、exec、パイプ fork, system
DES Source Code
This page shows how to use this DES function, and provides the source code in Javascript, Perl and PHP. Usage des (string key, string message, boolean encrypt, [integer mode, string iv, integer padding]) The des function accepts an 8 character string as the key (this is 64 bits, but the algorithm only uses 56) for normal DES or a 24 character string for triple DES, a message string, a boolean to s
どんぞこ日誌(2006-02-16) 閑話休題：threadsとencoding
* [今月のAcme] 閑話休題：threadsとencoding えーと、先月に続き忙しくて日誌をつける気力がありません。もちろんAcme関連を書く気力もありません。ですので、ちょっと趣向を変えてthreadsとencodingについて書きます。ご存知のとおりencodingプラグマ（というかbinmode filehandle, layer）とthreadsを併用するとPerlがクラッシュします。 use encoding 'euc-jp', STDOUT => 'shiftjis'; use threads; threads->new(\&subref)->join; # クラッシュ！ だいたいthreadsが使えるぐらいならutf8でソースを書いてuse utf8;すればよいだけのことじゃないか、というのは言わない約束で。で、何とかthreadsとencodingを併用するお手軽な
今日もまた、別のこと。 - *Acme::Person::Bonnu
初めに：Mason がわからないので Jifty やる気が起きません。 なんか以前から色々なところで「Apache2 だと Sledge 動かないYO ！」みたいなのを聞いたりみたりしていたんだけど、これってそんなに難しいのだろうか？と、ふと思う。 CPAN で miyagawa さんの Bundle::Sledge 見る限りでは、上の二行に Apache::Request - Methods for dealing with client request Apache::Reload - Reload changed modulesって書いてあるけども、それって逆を言えば mod_perl 1.2X に依存してるのは、上記二つのモジュールを使っている箇所だけなワケで。 てことは Apache2::Request、Apache2::RequestRec、Apache2::RequestUt
XMLRPC::Lite (SOAP::Lite) で base64 エンコーディングさせない: blog.bulknews.net
XMLRPC::Lite (SOAP::Lite) で base64 エンコーディングさせない 404 Blog Not Found:はてなキーワード連想語API vs. XMLRPC::Lite そうなのです。XMLRPC::Liteは、Non-ASCIIな文字列はbase64でおくっておったのですね。 以下のようにすれば base64 しないでそのまま string として送るようになります。ローカルハックは必要なし。 my $res = XMLRPC::Lite->new->proxy('http://d.hatena.ne.jp/xmlrpc') ->call('hatena.getSimilarWord', { wordlist => [ XMLRPC::Data->type(string => "はてな") ] } ); "はてな" の部分は utf-8 bytes でも Un
はてなキーワード連想語API vs. XMLRPC::Lite : 404 Blog Not Found
2006年02月15日21:39 カテゴリLightweight Languagesどつぼ - pitfall はてなキーワード連想語API vs. XMLRPC::Lite 「小飼弾」を検索して「空気嫁」って出ないバグについてというネタを振ろうとしたら本当にbugを見つけたというお話。 はてなダイアリー日記 - キーワード連想語API公開について キーワード連想語API仕様の詳細については、以下キーワードをご参照ください。 はてなダイアリーキーワード連想語API しかも(21:15現在)、なんかアクセス集中しているのかはてなキーワードがStatus 500で落ちてる(苦笑)(21:45現在直ってます)。 例題にあるPerl Scriptで日本語をぶっこむとなぜか動かない。Ruby版は問題ないのに。これではかゆいし、くやしいので、原因を探してみると、ありましたありました。 XMLRPC::
HTML::ColorKeywords を使って chalow の検索をハイライトする
HTML::ColorKeywords を使って chalow の検索をハイライトする 2006-02-11-5: [Perl] HTML::ColorKeywords が便利だったので chalow の検索 cgi である clsearch.cgi に色を付けてみた． clsearch.cgi はシンプルモードでは黄色のハイライトが付くが，アイテムモードでは付かないので， とりあえずアイテムモードでもハイライトするパッチ． clsearch.cgi と同じディレクトリに HTML/ColorKeywords.pm を置いておく． --- clsearch.cgi-orig 2005-01-13 01:34:28.000000000 +0100 +++ clsearch.cgi 2006-02-12 00:25:49.374442000 +0100 @@ -2,6 +2,
Text::CSV_PP::Simple作ってみた - Hatena::Diary::Neko::kak 500 Internal Server Error
あんまり考えずに作った。 package Text::CSV_PP::Simple; use strict; use warnings; use base qw/Text::CSV_PP Class::Data::Inheritable/; use IO::File; use Scalar::Util qw/blessed/; __PACKAGE__->mk_classdata('io'); sub getline { my ($self,$io) = @_; unless ( blessed $io || $self->io ) { $self->io( IO::File->new( $io, "r") ) or die "Error : $io not found. $!"; } elsif ( ! $self->io ) { $self->io($io); } $self->pars
Want
NAME Want - A generalisation of wantarray SYNOPSIS use Want; sub foo :lvalue { if (want(qw'LVALUE ASSIGN')) { print "We have been assigned ", want('ASSIGN'); lnoreturn; } elsif (want('LIST')) { rreturn (1, 2, 3); } elsif (want('BOOL')) { rreturn 0; } elsif (want(qw'SCALAR !REF')) { rreturn 23; } elsif (want('HASH')) { rreturn { foo => 17, bar => 23 }; } return; # You have to put this at the end to
多値うち出来ない? : 404 Blog Not Found
2006年02月10日12:48 カテゴリLightweight Languages 多値うち出来ない? え? (Perl|Python|Ruby) では普通ですが。 檜山正幸のキマイラ飼育記 - なぜ、多値関数は人気がないのだろう via quinta essentia - 思考の枠を規定するもの なんで引数はn個なのに、戻り値は1個なんでしょう？ 多値関数をサポートしている言語もあるけど（例：Common Lisp）、なんかオマケみたいな扱い。言語の中核的仕様として多値を採用している例を僕は知りません（あったら、教えて）。 以下はperlの例。 ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($when); ところが、fが2値関数だとして、値を変数x1, x2で受けるとき、次のように書くのが分かりやすい
Debugging and Profiling mod_perl Applications
Debugging and Profiling mod_perl Applications Feb 9, 2006 by Frank Wiles Because of the added complexity of being inside of the Apache web server, debugging mod_perl applications is often not as straightforward as it is with regular Perl programs or CGIs. Is the problem with your code, Apache, a CPAN module you are using, or within mod_perl itself? How do you tell? Sometimes traditional debugging
Perldoc を引きたい。(続き) - Teny's Log
■[Emacs][perl] Perlモジュールのソースを簡単に開く機能の話の続き と、先日のエントリで Trackback を送った id:higepon さんに取り上げて貰っておきながら、全く反応できませんでした。申し訳ないことです。 このところ、公私共に色々とあって (と言っても圧倒的に `私' の方が上なのですが)、すっかり忙殺されてしまっていますもので。 一応、少し前には言及されていることに気付いており、また、 cperl-modeに取り込んでもらうようにするってのはとても良いアイデアですね。 やり方は二つあると思っていて id:tokuhiromさんや、id:tenyさんの実装のほうが優れているのでどちらかにお任せする id:higeponが言いだしっぺなので、自分のLispにお二人の成果を入れてから cperl-mode作者に突入する。 のどちらがよいでしょうか。＞コメント・
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
サービス終了のお知らせ
Perl.com: Catalyst の翻訳
http://www.typemiss.net/blog/kounoike/20060212-65
http://kero.no-ip.com/conv.txt
IBM Developer
http://www.typemiss.net/blog/kounoike/20060212-64