クリスマス前にLTをやることになったので以前Rubyでやった下記ネタをPerlで書き直した上、最終的にフォントを作る所までいって挫折したお話。 shimx.hateblo.jp speakerdeck.com コードはこちら↓ gist.github.com demo gyazo.com

前置き JSON SQL Injectionが話題になっていますね。 参照） 不正なJSONデータによるSQL Injectionへの対策について (Json.pm+SQLクエリビルダー) — Mobage Developers Blog Kazuho's Weblog: The JSON SQL Injection Vulnerability（英文にて） JSON SQL In…

タイトルウソです。もっとかかりましたすみません。 徳丸浩の雑記帳: 数字6桁パスワードのハッシュ値の総当たり、PHPなら約0.25秒で終わるよ を読んで、Perlでも実装してみた。 まあPHPとほとんど変わらないんですけれども。 今回はマルチプロセスの復習がて…

聞かれて答えられなかったので調べて書いた。 キモは関数で受け取る引数の制限（プロトタイプ）を利用。 &を第一引数として指定した場合には、ブロックごと受け取れるとのこと。 ブロックを受け取れるのは第一引数だけね。 プロトタイプ使うことないなーと思…

JSON::XSで、取得したJSONをdecodeしてPerlのハッシュリファレンスにした場合、JSON::XS::Booleanのオブジェクトが入ってた時用のメモ。 例えば { "flag_on" : true, "flag_off" : false "flag_on_str" : "true", "flag_off_str" : "false" } というJSONをde…

ふと思い立って、はじめてみた。 http://www.hakoniwa.net/tt/ Directivesのはあるのだけど、他はないんですよね。 まあ、公式サイト見ればサンプルコード書いてあるし分かるって話だけど。。。 少しずつ、追記してきます。 これも機械翻訳よりは少しだけマ…

PerlでXMLをハッシュに変換してベンチをとってみました。 XML::Simpleは遅いよって記事を見かけたので頑張ってXML::libXMLで再帰的にハッシュリファレンスに突っ込んでくコード書いたのですが、 ベンチをとったらXML::Simpleの方が早かった…。 コードがおか…

普段使い用メモ。 最低限やるべき＆やってよね的な事。 もちろん、use strict; use warnings;は必須。 perl -c /hoge/fuga.pl デフォルト以外のインクルードファイル（例だと/foo/lib以下にファイルがある）呼んでたら perl -I /foo/lib -c /foo/lib/bar/Buz…