The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
foo.pl use strict; use warnings; sub my_print{ my $c = shift; $c . "\n"; } 1; foo.t use strict; use warnings; use Test::More 'no_plan'; require 'foo.pl'; ok( my_print('First Test') eq 'First Test' . "\n"); 実行 $ perl foo.t ok 1 1..1 ここまでは簡単なんだが foo.pl がこのようにprintしていて、 print したものが正しいか調べるのはむずかしい。どうすれば.... use strict; use warnings; sub my_print{ my $c = shift; print $c . "\n"; } 1; ここのがよさそうなので試してみる ST
テストが膨大になっていくと,あるテストでは時間がかかったりして「そのテストはもう成功することがわかっとるっちゅうねん;失敗するテストだけ再テストしたいっちゅうねん」ってことになったりします。そんなときに使えるのが prove コマンドの --state オプションです。 --state オプションに failed という引数をわたすと,「テストの対象は前回 fail したテストスクリプトのみ対象」という意味になります。ステートを保存する save と併用して指定してみます。 % prove --state failed,save No saved state, selection will be empty Files=0, Tests=0, 0 wallclock secs ( 0.00 usr + 0.00 sys = 0.00 CPU) Result: NOTESTS「No save
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く