package TAP::Formatter::File; use strict; use TAP::Formatter::Base (); use TAP::Formatter::File::Session; use POSIX qw(strftime); use vars qw($VERSION @ISA); @ISA = qw(TAP::Formatter::Base); =head1 NAME TAP::Formatter::File - Harness output delegate for file output =head1 VERSION Version 3.28 =cut $VERSION = '3.28'; =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;
Name | Type | Size | Permission | Actions |
---|---|---|---|---|
Console | Folder | 0755 |
|
|
File | Folder | 0755 |
|
|
Base.pm | File | 11.63 KB | 0644 |
|
Color.pm | File | 3.21 KB | 0644 |
|
Console.pm | File | 1.75 KB | 0644 |
|
File.pm | File | 890 B | 0644 |
|
Session.pm | File | 3.74 KB | 0644 |
|