use strict; BEGIN{ if (not $] < 5.006) { require warnings; warnings->import } } package Test::Reporter::Transport::Null; our $VERSION = '1.58'; # VERSION use base 'Test::Reporter::Transport'; sub new { return bless {}, shift; } sub send { return 1; # do nothing } 1; # ABSTRACT: Null transport for Test::Reporter =pod =head1 NAME Test::Reporter::Transport::Null - Null transport for Test::Reporter =head1 VERSION version 1.58 =head1 SYNOPSIS my $report = Test::Reporter->new( transport => 'Null', ); =head1 DESCRIPTION This module provides a "null" transport option that does nothing when C is called. =for Pod::Coverage new send =head1 USAGE See L and L for general usage information. =head1 AUTHORS =over 4 =item * Adam J. Foxson =item * David Golden =item * Kirrily "Skud" Robert =item * Ricardo Signes =item * Richard Soderberg =item * Kurt Starsinic =back =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2011 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 __END__