Filename | /usr/share/perl5/DateTime/TimeZone/UTC.pm |
Statements | Executed 8 statements in 177µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 16µs | 28µs | BEGIN@3 | DateTime::TimeZone::UTC::
1 | 1 | 1 | 8µs | 12µs | BEGIN@4 | DateTime::TimeZone::UTC::
1 | 1 | 1 | 6µs | 32µs | BEGIN@6 | DateTime::TimeZone::UTC::
0 | 0 | 0 | 0s | 0s | _new_instance | DateTime::TimeZone::UTC::
0 | 0 | 0 | 0s | 0s | category | DateTime::TimeZone::UTC::
0 | 0 | 0 | 0s | 0s | is_dst_for_datetime | DateTime::TimeZone::UTC::
0 | 0 | 0 | 0s | 0s | is_utc | DateTime::TimeZone::UTC::
0 | 0 | 0 | 0s | 0s | new | DateTime::TimeZone::UTC::
0 | 0 | 0 | 0s | 0s | offset_for_datetime | DateTime::TimeZone::UTC::
0 | 0 | 0 | 0s | 0s | offset_for_local_datetime | DateTime::TimeZone::UTC::
0 | 0 | 0 | 0s | 0s | short_name_for_datetime | DateTime::TimeZone::UTC::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package DateTime::TimeZone::UTC; | ||||
2 | 1 | 300ns | $DateTime::TimeZone::UTC::VERSION = '1.75'; | ||
3 | 2 | 26µs | 2 | 40µs | # spent 28µs (16+12) within DateTime::TimeZone::UTC::BEGIN@3 which was called:
# once (16µs+12µs) by DateTime::TimeZone::OffsetOnly::BEGIN@8 at line 3 # spent 28µs making 1 call to DateTime::TimeZone::UTC::BEGIN@3
# spent 12µs making 1 call to strict::import |
4 | 2 | 25µs | 2 | 17µs | # spent 12µs (8+4) within DateTime::TimeZone::UTC::BEGIN@4 which was called:
# once (8µs+4µs) by DateTime::TimeZone::OffsetOnly::BEGIN@8 at line 4 # spent 12µs making 1 call to DateTime::TimeZone::UTC::BEGIN@4
# spent 4µs making 1 call to warnings::import |
5 | |||||
6 | 2 | 124µs | 2 | 32µs | # spent 32µs (6+26) within DateTime::TimeZone::UTC::BEGIN@6 which was called:
# once (6µs+26µs) by DateTime::TimeZone::OffsetOnly::BEGIN@8 at line 6 # spent 32µs making 1 call to DateTime::TimeZone::UTC::BEGIN@6
# spent 26µs making 1 call to parent::import, recursion: max depth 1, sum of overlapping time 26µs |
7 | |||||
8 | sub new { | ||||
9 | return shift->instance; | ||||
10 | } | ||||
11 | |||||
12 | sub _new_instance { | ||||
13 | my $class = shift; | ||||
14 | |||||
15 | return bless { name => 'UTC' }, $class; | ||||
16 | } | ||||
17 | |||||
18 | sub is_dst_for_datetime {0} | ||||
19 | |||||
20 | sub offset_for_datetime {0} | ||||
21 | sub offset_for_local_datetime {0} | ||||
22 | |||||
23 | sub short_name_for_datetime {'UTC'} | ||||
24 | |||||
25 | sub category {undef} | ||||
26 | |||||
27 | sub is_utc {1} | ||||
28 | |||||
29 | 1 | 2µs | 1; | ||
30 | |||||
31 | # ABSTRACT: The UTC time zone | ||||
32 | |||||
33 | __END__ |