みかづきメモ

主にプログラミング関連のメモ帳 ♪(✿╹ヮ╹)ノ 書いてあるコードは自己責任でご自由にどうぞ。記事本文の無断転載は禁止です。

Perl

Test::More で Non-zero wait status: 14 とでてテストが正常に終了しない

Test::More などを使ってテストしている際、 Non-zero wait status: 14 と出てしまい、 テストが全て走らずに、見た目上は成功して終了する、というケースに遭遇しました。 最も近いものとしては、この現象になります。 www.perlmonks.org exit status が違…

Amon2 で View で使えるメソッドを追加したい

Rails だと Helper メソッドと言われている View で使える関数を追加したい。 そんなときは、 lib/MyProj/Web/ViewFunctions.pm に追加すれば使えるようになります。 # lib/MyProj/Web/ViewFunctions.pm package MyProj::Web::ViewFunctions; # (略) sub kaw…

PerlTidy の自動フォーマットを、特定区間で無効化したい

いやわざとそうやってるんだよみたいな部分まで直されてしまうので、無効化したい。 例えば、下のコードは勝手に良い感じ (?) にフォーマットされてしまう。 my @test_cases = ( [ {}, [] ] ); そんなときはコメント <<< と >>> で囲めばその部分だけ無視し…

Perl の false を追いかける

Perl 触ってて例えば、下のようなコードがあって、 $r には何が入っているのかという問題。 sub is_even { $_[0] % 2 == 0; } my $r = is_even(1); # false print $r としても何も表示されないので ''だと思っていたのだけれども、違っていた。 例えば以下の…