# $Id: Test.pm,v 1.8 2007-04-18 15:24:45 mike Exp $ package ZOOM::IRSpy::Test; use 5.008; use strict; use warnings; =head1 NAME ZOOM::IRSpy::Test - base class for tests in IRSpy =head1 SYNOPSIS ## To follow =head1 DESCRIPTION I<## To follow> =cut sub subtests { () } sub timeout { undef } sub start { my $class = shift(); my($conn) = @_; die "can't start the base-class test"; } =head1 SEE ALSO ZOOM::IRSpy =head1 AUTHOR Mike Taylor, Emike@indexdata.comE =head1 COPYRIGHT AND LICENSE Copyright (C) 2006 by Index Data ApS. This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.7 or, at your option, any later version of Perl 5 you may have available. =cut 1;