Filename | /usr/local/share/perl/5.18.2/HTTP/Headers/ActionPack/Core/BaseHeaderList.pm |
Statements | Executed 14 statements in 391µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 43µs | 56µs | BEGIN@10 | HTTP::Headers::ActionPack::Core::BaseHeaderList::
1 | 1 | 1 | 12µs | 12µs | BEGIN@2 | HTTP::Headers::ActionPack::Core::BaseHeaderList::
1 | 1 | 1 | 12µs | 49µs | BEGIN@13 | HTTP::Headers::ActionPack::Core::BaseHeaderList::
1 | 1 | 1 | 10µs | 36µs | BEGIN@16 | HTTP::Headers::ActionPack::Core::BaseHeaderList::
1 | 1 | 1 | 10µs | 14µs | BEGIN@11 | HTTP::Headers::ActionPack::Core::BaseHeaderList::
1 | 1 | 1 | 9µs | 165µs | BEGIN@14 | HTTP::Headers::ActionPack::Core::BaseHeaderList::
0 | 0 | 0 | 0s | 0s | add | HTTP::Headers::ActionPack::Core::BaseHeaderList::
0 | 0 | 0 | 0s | 0s | add_header_value | HTTP::Headers::ActionPack::Core::BaseHeaderList::
0 | 0 | 0 | 0s | 0s | as_string | HTTP::Headers::ActionPack::Core::BaseHeaderList::
0 | 0 | 0 | 0s | 0s | iterable | HTTP::Headers::ActionPack::Core::BaseHeaderList::
0 | 0 | 0 | 0s | 0s | new_from_string | HTTP::Headers::ActionPack::Core::BaseHeaderList::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package HTTP::Headers::ActionPack::Core::BaseHeaderList; | ||||
2 | # spent 12µs within HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@2 which was called:
# once (12µs+0s) by parent::import at line 4 | ||||
3 | 1 | 7µs | $HTTP::Headers::ActionPack::Core::BaseHeaderList::AUTHORITY = 'cpan:STEVAN'; | ||
4 | 1 | 41µs | 1 | 12µs | } # spent 12µs making 1 call to HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@2 |
5 | { | ||||
6 | 2 | 1µs | $HTTP::Headers::ActionPack::Core::BaseHeaderList::VERSION = '0.09'; | ||
7 | } | ||||
8 | # ABSTRACT: A Base Header List | ||||
9 | |||||
10 | 2 | 31µs | 2 | 70µs | # spent 56µs (43+13) within HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@10 which was called:
# once (43µs+13µs) by parent::import at line 10 # spent 56µs making 1 call to HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@10
# spent 13µs making 1 call to strict::import |
11 | 2 | 32µs | 2 | 18µs | # spent 14µs (10+4) within HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@11 which was called:
# once (10µs+4µs) by parent::import at line 11 # spent 14µs making 1 call to HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@11
# spent 4µs making 1 call to warnings::import |
12 | |||||
13 | 2 | 34µs | 2 | 85µs | # spent 49µs (12+37) within HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@13 which was called:
# once (12µs+37µs) by parent::import at line 13 # spent 49µs making 1 call to HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@13
# spent 37µs making 1 call to Exporter::import |
14 | 2 | 36µs | 2 | 322µs | # spent 165µs (9+156) within HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@14 which was called:
# once (9µs+156µs) by parent::import at line 14 # spent 165µs making 1 call to HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@14
# spent 156µs making 1 call to Sub::Exporter::__ANON__[Sub/Exporter.pm:337] |
15 | |||||
16 | 2 | 206µs | 2 | 36µs | # spent 36µs (10+27) within HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@16 which was called:
# once (10µs+27µs) by parent::import at line 16 # spent 36µs making 1 call to HTTP::Headers::ActionPack::Core::BaseHeaderList::BEGIN@16
# spent 27µs making 1 call to parent::import, recursion: max depth 2, sum of overlapping time 27µs |
17 | |||||
18 | sub new_from_string { | ||||
19 | my ($class, $header_string) = @_; | ||||
20 | my $list = $class->new; | ||||
21 | foreach my $header ( split_header_words( $header_string ) ) { | ||||
22 | $list->add_header_value( $header ) | ||||
23 | } | ||||
24 | $list; | ||||
25 | } | ||||
26 | |||||
27 | sub as_string { | ||||
28 | my $self = shift; | ||||
29 | join ', ' => map { blessed $_ ? $_->as_string : $_ } $self->iterable; | ||||
30 | } | ||||
31 | |||||
32 | sub add { die "Abstract method" } | ||||
33 | sub add_header_value { die "Abstract method" } | ||||
34 | sub iterable { die "Abstract method" } | ||||
35 | |||||
36 | 1 | 2µs | 1; | ||
37 | |||||
38 | __END__ |