tap-harness

问题 I have a set of scripts that produces a JUnit output for Jenkins. The code I execute looks like this (this is just a snippet so you get the idea) : #!/usr/bin/env perl use strict; use warnings; use Test::More; use TAP::Harness; use Test::Builder; my $runner = sub { my ($harness,$test) = @_; sleep(2); my $builder = Test::Builder->new; $builder->reset; $builder->output( \my ($out) ); $builder->failure_output( \$out ); $builder->todo_output( \$out ); $builder->is_eq($test,'test', 'Test is test')

问题 I have a set of scripts that produces a JUnit output for Jenkins. The code I execute looks like this (this is just a snippet so you get the idea) : #!/usr/bin/env perl use strict; use warnings; use Test::More; use TAP::Harness; use Test::Builder; my $runner = sub { my ($harness,$test) = @_; sleep(2); my $builder = Test::Builder->new; $builder->reset; $builder->output( \my ($out) ); $builder->failure_output( \$out ); $builder->todo_output( \$out ); $builder->is_eq($test,'test', 'Test is test')