/usr/share/perl5/Test/Reporter/Transport/Null.pm is in libtest-reporter-perl 1.60-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 | use strict;
BEGIN{ if (not $] < 5.006) { require warnings; warnings->import } }
package Test::Reporter::Transport::Null;
our $VERSION = '1.60'; # VERSION
use base 'Test::Reporter::Transport';
sub new {
return bless {}, shift;
}
sub send {
return 1; # do nothing
}
1;
# ABSTRACT: Null transport for Test::Reporter
__END__
=pod
=encoding UTF-8
=head1 NAME
Test::Reporter::Transport::Null - Null transport for Test::Reporter
=head1 VERSION
version 1.60
=head1 SYNOPSIS
my $report = Test::Reporter->new(
transport => 'Null',
);
=head1 DESCRIPTION
This module provides a "null" transport option that does nothing when
C<send()> is called.
=head1 USAGE
See L<Test::Reporter> and L<Test::Reporter::Transport> for general usage
information.
=for Pod::Coverage new send
=head1 AUTHORS
=over 4
=item *
Adam J. Foxson <afoxson@pobox.com>
=item *
David Golden <dagolden@cpan.org>
=item *
Kirrily "Skud" Robert <skud@cpan.org>
=item *
Ricardo Signes <rjbs@cpan.org>
=item *
Richard Soderberg <rsod@cpan.org>
=item *
Kurt Starsinic <Kurt.Starsinic@isinet.com>
=back
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2013 by Authors and Contributors.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut
|