line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
|
2
|
|
|
|
|
|
|
use Moose; |
3
|
2
|
|
|
2
|
|
16
|
use namespace::clean -except => 'meta'; |
|
2
|
|
|
|
|
5
|
|
|
2
|
|
|
|
|
11
|
|
4
|
2
|
|
|
2
|
|
10779
|
|
|
2
|
|
|
|
|
4
|
|
|
2
|
|
|
|
|
13
|
|
5
|
|
|
|
|
|
|
extends 'Catalyst::Exception::StructuredParameter'; |
6
|
|
|
|
|
|
|
|
7
|
|
|
|
|
|
|
has 'pointer' => (is=>'ro', required=>1); |
8
|
|
|
|
|
|
|
has 'max' => (is=>'ro', required=>1); |
9
|
|
|
|
|
|
|
has 'attempted' => (is=>'ro', required=>1); |
10
|
|
|
|
|
|
|
|
11
|
|
|
|
|
|
|
return "Pointer '@{[ $_[0]->pointer ]}' has array length of '@{[ $_[0]->attempted ]}' but maximum is '@{[ $_[0]->max ]}'."; |
12
|
|
|
|
|
|
|
} |
13
|
0
|
|
|
0
|
0
|
|
|
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
14
|
|
|
|
|
|
|
__PACKAGE__->meta->make_immutable; |