line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package Test::Proto::HashRef; |
2
|
11
|
|
|
11
|
|
43011
|
use 5.008; |
|
11
|
|
|
|
|
42
|
|
|
11
|
|
|
|
|
466
|
|
3
|
11
|
|
|
11
|
|
69
|
use strict; |
|
11
|
|
|
|
|
25
|
|
|
11
|
|
|
|
|
389
|
|
4
|
11
|
|
|
11
|
|
79
|
use warnings; |
|
11
|
|
|
|
|
128
|
|
|
11
|
|
|
|
|
341
|
|
5
|
11
|
|
|
11
|
|
1029
|
use Moo; |
|
11
|
|
|
|
|
34698
|
|
|
11
|
|
|
|
|
77
|
|
6
|
|
|
|
|
|
|
extends 'Test::Proto::Base'; |
7
|
|
|
|
|
|
|
with( 'Test::Proto::Role::Value', 'Test::Proto::Role::HashRef' ); |
8
|
|
|
|
|
|
|
|
9
|
|
|
|
|
|
|
=head1 NAME |
10
|
|
|
|
|
|
|
|
11
|
|
|
|
|
|
|
Test::Proto::HashRef - Prototype with methods for hashrefs |
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
=head1 SYNOPSIS |
14
|
|
|
|
|
|
|
|
15
|
|
|
|
|
|
|
use Test::Proto::HashRef; |
16
|
|
|
|
|
|
|
my $pHr = Test::Proto::HashRef->new(); |
17
|
|
|
|
|
|
|
$pHr->enumerate(2, [['a','b'],['c','d']]); |
18
|
|
|
|
|
|
|
$pHr->ok({a=>'b', c=>'d'}); |
19
|
|
|
|
|
|
|
|
20
|
|
|
|
|
|
|
Use this class for validating hashes and hashrefs. If you have hashes, you must put them in a reference first. |
21
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
=head1 METHODS |
23
|
|
|
|
|
|
|
|
24
|
|
|
|
|
|
|
All methods are provided by L or L. |
25
|
|
|
|
|
|
|
|
26
|
|
|
|
|
|
|
=head1 OTHER INFORMATION |
27
|
|
|
|
|
|
|
|
28
|
|
|
|
|
|
|
For author, version, bug reports, support, etc, please see L. |
29
|
|
|
|
|
|
|
|
30
|
|
|
|
|
|
|
=cut |
31
|
|
|
|
|
|
|
|
32
|
|
|
|
|
|
|
1; |