/
usr
/
share
/
perl5
/
vendor_perl
/
TAP
/
Formatter
/
/usr/share/perl5/vendor_perl/TAP/Formatter
mkdir
upload
Name
Size
Mode
Actions
Console/
-
0755
rm
File/
-
0755
rm
Base.pm
11870
0644
edit
dl
rm
Color.pm
2321
0644
edit
dl
rm
Console.pm
1995
0644
edit
dl
rm
File.pm
850
0644
edit
dl
rm
Session.pm
4988
0644
edit
dl
rm
Edit:
/usr/share/perl5/vendor_perl/TAP/Formatter/File.pm
(850B)
package TAP::Formatter::File; use strict; use warnings; use TAP::Formatter::File::Session; use POSIX qw(strftime); use base 'TAP::Formatter::Base'; =head1 NAME TAP::Formatter::File - Harness output delegate for file output =head1 VERSION Version 3.42 =cut our $VERSION = '3.42'; =head1 DESCRIPTION This provides file orientated output formatting for TAP::Harness. =head1 SYNOPSIS use TAP::Formatter::File; my $harness = TAP::Formatter::File->new( \%args ); =head2 C<< open_test >> See L<TAP::Formatter::Base> =cut sub open_test { my ( $self, $test, $parser ) = @_; my $session = TAP::Formatter::File::Session->new( { name => $test, formatter => $self, parser => $parser, } ); $session->header; return $session; } sub _should_show_count { return 0; } 1;
Save
cmd:
run