OXIESEC PANEL
- Current Dir:
/
/
usr
/
share
/
perl
/
5.26.1
/
TAP
/
Formatter
Server IP: 139.59.38.164
Upload:
Create Dir:
Name
Size
Modified
Perms
📁
..
-
05/09/2024 07:13:15 AM
rwxr-xr-x
📄
Base.pm
11.59 KB
05/23/2023 05:17:19 PM
rw-r--r--
📄
Color.pm
3.2 KB
05/23/2023 05:17:19 PM
rw-r--r--
📁
Console
-
05/09/2024 07:13:15 AM
rwxr-xr-x
📄
Console.pm
1.95 KB
05/23/2023 05:17:19 PM
rw-r--r--
📁
File
-
05/09/2024 07:13:15 AM
rwxr-xr-x
📄
File.pm
850 bytes
05/23/2023 05:17:19 PM
rw-r--r--
📄
Session.pm
4.87 KB
05/23/2023 05:17:19 PM
rw-r--r--
Editing: File.pm
Close
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.38 =cut our $VERSION = '3.38'; =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;