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