File Coverage

blib/lib/WebDAO.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1             package WebDAO;
2              
3 5     5   61759 use strict;
  5         10  
  5         110  
4 5     5   21 use warnings;
  5         7  
  5         115  
5 5     5   1405 use WebDAO::Base;
  5         10  
  5         324  
6 5     5   1447 use WebDAO::Element;
  5         18  
  5         185  
7 5     5   1606 use WebDAO::Container;
  5         10  
  5         190  
8 5     5   13878 use WebDAO::Engine;
  5         12  
  5         396  
9             our @ISA = qw(WebDAO::Element Exporter);
10              
11             our $VERSION = '2.24';
12             @WebDAO::EXPORT = qw( mk_route mk_attr _log1 _log2 _log3
13             _log4 _log5 _log6);
14              
15             =head2 mk_route ( 'route1'=> 'Class::Name', 'route2'=> sub { return new My::Class() })
16              
17             Make route table for object
18              
19             use WebDAO;
20             mk_route(
21             user=>'MyClass::User',
22             test=>sub { return MyClass->new( param1=>1 ) }
23             );
24              
25             =cut
26              
27              
28              
29             1;
30             __END__