のPerl - TAP ::ハーネスとtest_args

Question

私はこのようなPerlでTAP::Harnessを使用しています：

$harness = TAP::Harness->new({ 
     formatter_class => 'TAP::Formatter::Console', 
     merge => 1, 
     verbosity => 1, 
     normalize => 1, 
     color => 1, 
     test_args => ['--url', $url, '--session', $session], 
    }); 

はいつか後、私はいくつかのテストの配列を渡し、）（$ harness-> runtestsと書い呼び出します。

問題は、私のテストのすべてにおいて、次のとおりです。

use Data::Dumper; 
print Dumper \@ARGV; 

出力：

$VAR1 = []; 

test_argsは、基礎となるテストで@ARGVには出てきませんか？私はいくつかのオプションを各テストに渡す必要があります。

Answer 1

初期設定は機能しますか？私は、コードの一部を再入力

use Test::More; 
use Data::Dump qw(dump); 

dump [@ARGV]; # prints ["--url", "", "--session", ""] 

done_testing;