File Coverage

blib/lib/DBIx/Class/Schema/PopulateMore/Test/Schema/ResultSet/Person.pm
Criterion Covered Total %
statement 3 5 60.0
branch n/a
condition n/a
subroutine 1 2 50.0
pod 1 1 100.0
total 5 8 62.5


line stmt bran cond sub pod time code
1             package #hide from pause
2             DBIx::Class::Schema::PopulateMore::Test::Schema::ResultSet::Person;
3              
4 3     3   3808 use parent 'DBIx::Class::Schema::PopulateMore::Test::Schema::ResultSet';
  3         5  
  3         15  
5              
6              
7             =head1 NAME
8              
9             DBIx::Class::Schema::PopulateMore::Test::Schema::ResultSet::Person - Person Resultset
10              
11             =head1 DESCRIPTION
12              
13             Resultset Methods for the Person Source
14              
15             =head1 METHODS
16              
17             This module defines the following methods.
18              
19             =head2 older_than($int)
20              
21             Only people over a given age
22              
23             =cut
24              
25             sub older_than
26             {
27 0     0 1   my ($self, $age) = @_;
28            
29 0           return $self->search({age=>{'>'=>$age}});
30             }
31              
32              
33             =head1 AUTHOR
34              
35             Please see L<DBIx::Class::Schema::PopulateMore> For authorship information
36              
37             =head1 LICENSE
38              
39             Please see L<DBIx::Class::Schema::PopulateMore> For licensing terms.
40              
41             =cut
42              
43              
44             1;