Filename | /usr/lib/x86_64-linux-gnu/perl5/5.20/Params/Validate.pm |
Statements | Executed 26 statements in 2.24ms |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 1.50ms | 6.99ms | BEGIN@9 | Params::Validate::
1 | 1 | 1 | 1.37ms | 1.46ms | BEGIN@10 | Params::Validate::
1 | 1 | 1 | 16µs | 16µs | BEGIN@3 | Params::Validate::
1 | 1 | 1 | 7µs | 11µs | BEGIN@6 | Params::Validate::
1 | 1 | 1 | 7µs | 18µs | BEGIN@5 | Params::Validate::
1 | 1 | 1 | 7µs | 42µs | BEGIN@12 | Params::Validate::
1 | 1 | 1 | 4µs | 11µs | BEGIN@8 | Params::Validate::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package Params::Validate; | ||||
2 | 1 | 400ns | $Params::Validate::VERSION = '1.13'; | ||
3 | 2 | 43µs | 1 | 16µs | # spent 16µs within Params::Validate::BEGIN@3 which was called:
# once (16µs+0s) by DateTime::TimeZone::OffsetOnly::BEGIN@9 at line 3 # spent 16µs making 1 call to Params::Validate::BEGIN@3 |
4 | |||||
5 | 2 | 23µs | 2 | 29µs | # spent 18µs (7+11) within Params::Validate::BEGIN@5 which was called:
# once (7µs+11µs) by DateTime::TimeZone::OffsetOnly::BEGIN@9 at line 5 # spent 18µs making 1 call to Params::Validate::BEGIN@5
# spent 11µs making 1 call to strict::import |
6 | 2 | 21µs | 2 | 16µs | # spent 11µs (7+4) within Params::Validate::BEGIN@6 which was called:
# once (7µs+4µs) by DateTime::TimeZone::OffsetOnly::BEGIN@9 at line 6 # spent 11µs making 1 call to Params::Validate::BEGIN@6
# spent 4µs making 1 call to warnings::import |
7 | |||||
8 | 2 | 2µs | 2 | 18µs | # spent 11µs (4+7) within Params::Validate::BEGIN@8 which was called:
# once (4µs+7µs) by DateTime::TimeZone::OffsetOnly::BEGIN@9 at line 8 # spent 11µs making 1 call to Params::Validate::BEGIN@8
# spent 7µs making 1 call to Exporter::import |
9 | 2 | 756µs | 1 | 6.99ms | # spent 6.99ms (1.50+5.49) within Params::Validate::BEGIN@9 which was called:
# once (1.50ms+5.49ms) by DateTime::TimeZone::OffsetOnly::BEGIN@9 at line 9 # spent 6.99ms making 1 call to Params::Validate::BEGIN@9 |
10 | 2 | 1.21ms | 2 | 1.51ms | # spent 1.46ms (1.37+84µs) within Params::Validate::BEGIN@10 which was called:
# once (1.37ms+84µs) by DateTime::TimeZone::OffsetOnly::BEGIN@9 at line 10 # spent 1.46ms making 1 call to Params::Validate::BEGIN@10
# spent 50µs making 1 call to Exporter::import |
11 | |||||
12 | 2 | 155µs | 2 | 77µs | # spent 42µs (7+35) within Params::Validate::BEGIN@12 which was called:
# once (7µs+35µs) by DateTime::TimeZone::OffsetOnly::BEGIN@9 at line 12 # spent 42µs making 1 call to Params::Validate::BEGIN@12
# spent 35µs making 1 call to vars::import |
13 | |||||
14 | 1 | 5µs | our @ISA = 'Exporter'; | ||
15 | |||||
16 | 1 | 2µs | my %tags = ( | ||
17 | types => [ | ||||
18 | qw( | ||||
19 | SCALAR | ||||
20 | ARRAYREF | ||||
21 | HASHREF | ||||
22 | CODEREF | ||||
23 | GLOB | ||||
24 | GLOBREF | ||||
25 | SCALARREF | ||||
26 | HANDLE | ||||
27 | BOOLEAN | ||||
28 | UNDEF | ||||
29 | OBJECT | ||||
30 | ) | ||||
31 | ], | ||||
32 | ); | ||||
33 | |||||
34 | our %EXPORT_TAGS = ( | ||||
35 | 'all' => [ | ||||
36 | qw( validate validate_pos validation_options validate_with ), | ||||
37 | 1 | 5µs | map { @{ $tags{$_} } } keys %tags | ||
38 | ], | ||||
39 | %tags, | ||||
40 | ); | ||||
41 | |||||
42 | 1 | 1µs | our @EXPORT_OK = ( @{ $EXPORT_TAGS{all} }, 'set_options' ); | ||
43 | 1 | 300ns | our @EXPORT = qw( validate validate_pos ); | ||
44 | |||||
45 | 1 | 300ns | $NO_VALIDATION = $ENV{PERL_NO_VALIDATION}; | ||
46 | |||||
47 | { | ||||
48 | 2 | 3µs | 1 | 20µs | my $loader = Module::Implementation::build_loader_sub( # spent 20µs making 1 call to Module::Implementation::build_loader_sub |
49 | implementations => [ 'XS', 'PP' ], | ||||
50 | symbols => [ | ||||
51 | qw( | ||||
52 | validate | ||||
53 | validate_pos | ||||
54 | validate_with | ||||
55 | validation_options | ||||
56 | set_options | ||||
57 | ), | ||||
58 | ], | ||||
59 | ); | ||||
60 | |||||
61 | 1 | 600ns | $ENV{PARAMS_VALIDATE_IMPLEMENTATION} = 'PP' if $ENV{PV_TEST_PERL}; | ||
62 | |||||
63 | 1 | 4µs | 1 | 2.23ms | $loader->(); # spent 2.23ms making 1 call to Module::Implementation::__ANON__[Module/Implementation.pm:52] |
64 | } | ||||
65 | |||||
66 | 1 | 9µs | 1; | ||
67 | |||||
68 | # ABSTRACT: Validate method/function parameters | ||||
69 | |||||
70 | __END__ |