Test::Simpleを使ってテストを書きました。 自作モジュールがちゃんと動くかを確認します。 テスト対象は、映画のレビュー情報を管理するMovieモジュールです。 package Movie; sub new { my ($class, %args) = @_; bless ({%args} => $class); } sub title …

プログラミングPerl Vol.1の同名セクションにあるサンプルコードを写経する。 #配列リファレンスのリストを配列に代入する @AoA = ( [ "fred", "barney" ], [ "george", "jane", "elroy" ], [ "homer", "marge", "bart" ], ); print $AoA[2][1]; # marge #配…

カレントディレクトリにあるファイルを条件を指定して取得できるファイル名グロブ演算子の使い方メモ。 my @scripts = glob('*.pl'); for ( @scripts ) { print "$_\n"; } @scriptに.plファイルが入る。 取得したファイルを実行したり、または何か処理を加え…

日付の前後を比較したいとき、Time::Pieceとかでepoch秒とかを計算してやるしかないのかーとおもっていたら、実は文字列比較演算子を使えばできると先輩がおしえてくれた。 文字列でありながら、量の比較ができるのだ。これには4種類がある。 小なり (less t…

Prodessing.jsできれいな画面を作ってみたくなったので、 http://2g.atsukitaira.com/htmlcss/html5/850/ブラウザでお絵描きプログラミング！ Processing.js 登場！ - IT戦記 やってみた。 全画面表示させたかったけど、はてなブログだとできない？ canvasを…

ヨミガナを登録するために、漢字交じりのテキストをカタカナに変換する必要があった。Excelでヨミガナを振れるかためしてみたが、ダメだった。情報が登録されていないと、できないのだ。 それなら、ということでkakasiを使ってみたらうまくいったので、コマ…

pdftkでPDFを細かく分割するケースを例に取る。 シェルスクリプト。 #!/bin/bash pdftk hoge.pdf cat 159-617 output hoge_part1.pdf pdftk hoge.pdf cat 631-897 output hoge_part2.pdf pdftk hoge.pdf cat 912-923 output hoge_part3.pdf pdftk hoge.pdf c…