File Coverage

blib/lib/Database/Async/Engine/Empty.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Database::Async::Engine::Empty;
2              
3 2     2   13 use strict;
  2         5  
  2         66  
4 2     2   11 use warnings;
  2         6  
  2         86  
5              
6             our $VERSION = '0.017'; # VERSION
7              
8 2     2   11 use parent qw(Database::Async::Engine);
  2         5  
  2         9  
9              
10             =head1 NAME
11              
12             Database::Async::Engine::Empty - a database engine that does nothing useful
13              
14             =head1 DESCRIPTION
15              
16             =cut
17              
18             Database::Async::Engine->register_class(
19             empty => 'Database::Async::Engine::Empty',
20             );
21              
22             my %queries = (
23             q{select 1} => {
24             fields => [ '?column?' ],
25             rows => [
26             [ '1' ]
27             ],
28             },
29             );
30              
31             sub new {
32 1     1 1 4 my ($class, %args) = @_;
33 1         4 bless \%args, $class
34             }
35              
36             1;
37