Profile of DateTime/TimeZone/UTC.pm

Filename	/usr/share/perl5/DateTime/TimeZone/UTC.pm
Statements	Executed 14 statements in 455µs

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	31µs	38µs	DateTime::TimeZone::UTC::::BEGIN@3DateTime::TimeZone::UTC::BEGIN@3
1	1	1	19µs	112µs	DateTime::TimeZone::UTC::::BEGIN@9DateTime::TimeZone::UTC::BEGIN@9
1	1	1	18µs	66µs	DateTime::TimeZone::UTC::::BEGIN@5DateTime::TimeZone::UTC::BEGIN@5
1	1	1	13µs	13µs	DateTime::TimeZone::UTC::::BEGIN@8DateTime::TimeZone::UTC::BEGIN@8
0	0	0	0s	0s	DateTime::TimeZone::UTC::::categoryDateTime::TimeZone::UTC::category
0	0	0	0s	0s	DateTime::TimeZone::UTC::is_dst_for_datetime
0	0	0	0s	0s	DateTime::TimeZone::UTC::::is_utcDateTime::TimeZone::UTC::is_utc
0	0	0	0s	0s	DateTime::TimeZone::UTC::::newDateTime::TimeZone::UTC::new
0	0	0	0s	0s	DateTime::TimeZone::UTC::offset_for_datetime
0	0	0	0s	0s	DateTime::TimeZone::UTC::offset_for_local_datetime
0	0	0	0s	0s	DateTime::TimeZone::UTC::short_name_for_datetime

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

Line	State ments	Time on line	Calls	Time in subs	Code
1					package DateTime::TimeZone::UTC;
2
3	3	62µs	2	45µs	# spent 38µs (31+7) within DateTime::TimeZone::UTC::BEGIN@3 which was called: # once (31µs+7µs) by DateTime::TimeZone::OffsetOnly::BEGIN@11 at line 3 use strict; # spent 38µs making 1 call to DateTime::TimeZone::UTC::BEGIN@3 # spent 7µs making 1 call to strict::import
4
5	3	72µs	2	115µs	# spent 66µs (18+49) within DateTime::TimeZone::UTC::BEGIN@5 which was called: # once (18µs+49µs) by DateTime::TimeZone::OffsetOnly::BEGIN@11 at line 5 use vars qw ($VERSION); # spent 66µs making 1 call to DateTime::TimeZone::UTC::BEGIN@5 # spent 49µs making 1 call to vars::import
6	1	1µs			$VERSION = 0.01;
7
8	3	60µs	1	13µs	# spent 13µs within DateTime::TimeZone::UTC::BEGIN@8 which was called: # once (13µs+0s) by DateTime::TimeZone::OffsetOnly::BEGIN@11 at line 8 use DateTime::TimeZone; # spent 13µs making 1 call to DateTime::TimeZone::UTC::BEGIN@8
9	3	250µs	2	112µs	# spent 112µs (19+93) within DateTime::TimeZone::UTC::BEGIN@9 which was called: # once (19µs+93µs) by DateTime::TimeZone::OffsetOnly::BEGIN@11 at line 9 use base 'DateTime::TimeZone'; # spent 112µs making 1 call to DateTime::TimeZone::UTC::BEGIN@9 # spent 93µs making 1 call to base::import, recursion: max depth 1, sum of overlapping time 93µs
10
11					sub new {
12					my $class = shift;
13
14					return bless { name => 'UTC' }, $class;
15					}
16
17					sub is_dst_for_datetime {0}
18
19					sub offset_for_datetime {0}
20					sub offset_for_local_datetime {0}
21
22					sub short_name_for_datetime {'UTC'}
23
24					sub category {undef}
25
26					sub is_utc {1}
27
28	1	9µs			1;
29
30					__END__