Profile of /usr/local/lib/perl5/5.10.1/Test/Deep/Array.pm

← Index
NYTProf Performance Profile «block view•line view•sub view»
For 05.Domain_and_Item.t
Run on Tue May 4 17:21:41 2010
Reported on Tue May 4 17:23:23 2010

File | /usr/local/lib/perl5/5.10.1/Test/Deep/Array.pm
Statements Executed | 19
Statement Execution Time | 203µs

Subroutines — ordered by exclusive time
Calls | P | F | Exclusive Time | Inclusive Time | Subroutine
--- | --- | --- | --- | --- | ---
1 | 1 | 1 | 21µs | 2.01ms | Test::Deep::Array::::descendTest::Deep::Array::descend
1 | 1 | 1 | 7µs | 19µs | Test::Deep::Array::::BEGIN@6Test::Deep::Array::BEGIN@6
1 | 1 | 1 | 2µs | 2µs | Test::Deep::Array::::initTest::Deep::Array::init
0 | 0 | 0 | 0s | 0s | Test::Deep::Array::::reset_arrowTest::Deep::Array::reset_arrow

Call graph for these subroutines as a Graphviz dot language file.

Line | State ments | Time on line | Calls | Time in subs | Code
--- | --- | --- | --- | --- | ---
1 | 3 | 23µs | 2 | 24µs | use strict; # spent 21µs making 1 call to Test::Deep::BEGIN@1 # spent 3µs making 1 call to strict::import
2 | 3 | 27µs | 2 | 26µs | use warnings; # spent 17µs making 1 call to Test::Deep::BEGIN@2 # spent 9µs making 1 call to warnings::import
3 |  |  |  |  |
4 |  |  |  |  | package Test::Deep::Array;
5 |  |  |  |  |
6 | 3 | 130µs | 2 | 32µs | # spent 19µs (7+13) within Test::Deep::Array::BEGIN@6 which was called # once (7µs+13µs) by Test::Deep::__ANON__[/usr/local/lib/perl5/5.10.1/Test/Deep.pm:92] at line 6 use Test::Deep::Ref; # spent 19µs making 1 call to Test::Deep::Array::BEGIN@6 # spent 13µs making 1 call to Test::Deep::Cmp::import
7 |  |  |  |  |
8 |  |  |  |  | sub init
9 |  |  |  |  | # spent 2µs within Test::Deep::Array::init which was called # once (2µs+0s) by Test::Deep::Cmp::new at line 32 of Test/Deep/Cmp.pm {
10 | 1 | 200ns |  |  | my $self = shift;
11 |  |  |  |  |
12 | 1 | 200ns |  |  | my $val = shift;
13 |  |  |  |  |
14 | 1 | 6µs |  |  | $self->{val} = $val;
15 |  |  |  |  | }
16 |  |  |  |  |
17 |  |  |  |  | sub descend
18 |  |  |  |  | # spent 2.01ms (21µs+1.99) within Test::Deep::Array::descend which was called # once (21µs+1.99ms) by Test::Deep::descend at line 312 of Test/Deep.pm {
19 | 1 | 200ns |  |  | my $self = shift;
20 | 1 | 100ns |  |  | my $got = shift;
21 |  |  |  |  |
22 | 1 | 400ns |  |  | my $exp = $self->{val};
23 |  |  |  |  |
24 | 1 | 3µs | 2 | 394µs | return 0 unless Test::Deep::descend($got, Test::Deep::arraylength(scalar @$exp)); # spent 394µs making 1 call to Test::Deep::__ANON__[Test/Deep.pm:92] # spent 863µs making 1 call to Test::Deep::descend, recursion: max depth 3, time 863µs
25 |  |  |  |  |
26 | 1 | 5µs | 1 | 167µs | return 0 unless $self->test_class($got); # spent 167µs making 1 call to Test::Deep::Ref::test_class
27 |  |  |  |  |
28 | 1 | 5µs | 2 | 446µs | return Test::Deep::descend($got, Test::Deep::arrayelementsonly($exp)); # spent 446µs making 1 call to Test::Deep::__ANON__[Test/Deep.pm:92] # spent 122µs making 1 call to Test::Deep::descend, recursion: max depth 3, time 122µs
29 |  |  |  |  | }
30 |  |  |  |  |
31 |  |  |  |  | sub reset_arrow
32 |  |  |  |  | {
33 |  |  |  |  | return 0;
34 |  |  |  |  | }
35 |  |  |  |  |
36 | 1 | 3µs |  |  | 1;