合格したテストごとに「ok」を出力する Perl 単体テストがあります。最初に失敗したテストを見つけるために上にスクロールしていることに気づきました。それが唯一の関心事だからです。私は Test::More を使用しています。
use strict; use warnings;
use JSONRegex;
use Test::More;
失敗したテストのみを表示したいと思います。私は使用の解決策を試しました
perl -MTest::Harness -e 'runtests @ARGV' path/to/test_JSONRegex.pl
そしてそれはうまくいきました。しかし、それを忘れることができるように、それをシバン行に入れたかったのです。シバン
#!/usr/bin/env perl -MTest::Harness
メッセージで失敗しましたToo late for "-MTest::Harness" option at ./test_JSONRegex.pl line 1.
strictスクリプトでまだ使用しているときに、合格したテスト出力を抑制する最良の方法は何ですか?