Profile of DateTime/TimeZone/Floating.pm

Filename	/usr/share/perl5/DateTime/TimeZone/Floating.pm
Statements	Executed 22 statements in 332µs

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
2	1	1	40µs	40µs	DateTime::TimeZone::Floating::::newDateTime::TimeZone::Floating::new
1	1	1	33µs	43µs	DateTime::TimeZone::Floating::::BEGIN@3DateTime::TimeZone::Floating::BEGIN@3
1	1	1	13µs	66µs	DateTime::TimeZone::Floating::::BEGIN@5DateTime::TimeZone::Floating::BEGIN@5
1	1	1	11µs	3.16ms	DateTime::TimeZone::Floating::::BEGIN@9DateTime::TimeZone::Floating::BEGIN@9
1	1	1	10µs	10µs	DateTime::TimeZone::Floating::::BEGIN@8DateTime::TimeZone::Floating::BEGIN@8
4	2	1	5µs	5µs	DateTime::TimeZone::Floating::is_floating
0	0	0	0s	0s	DateTime::TimeZone::Floating::STORABLE_thaw

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::Floating;
2
3	3	51µs	2	52µs	# spent 43µs (33+10) within DateTime::TimeZone::Floating::BEGIN@3 which was called: # once (33µs+10µs) by DateTime::TimeZone::BEGIN@11 at line 3 use strict; # spent 43µs making 1 call to DateTime::TimeZone::Floating::BEGIN@3 # spent 10µs making 1 call to strict::import
4
5	3	40µs	2	119µs	# spent 66µs (13+53) within DateTime::TimeZone::Floating::BEGIN@5 which was called: # once (13µs+53µs) by DateTime::TimeZone::BEGIN@11 at line 5 use vars qw ($VERSION @ISA); # spent 66µs making 1 call to DateTime::TimeZone::Floating::BEGIN@5 # spent 53µs making 1 call to vars::import
6	1	600ns			$VERSION = 0.01;
7
8	3	32µs	1	10µs	# spent 10µs within DateTime::TimeZone::Floating::BEGIN@8 which was called: # once (10µs+0s) by DateTime::TimeZone::BEGIN@11 at line 8 use DateTime::TimeZone; # spent 10µs making 1 call to DateTime::TimeZone::Floating::BEGIN@8
9	3	151µs	2	6.32ms	# spent 3.16ms (11µs+3.15) within DateTime::TimeZone::Floating::BEGIN@9 which was called: # once (11µs+3.15ms) by DateTime::TimeZone::BEGIN@11 at line 9 use base 'DateTime::TimeZone::OffsetOnly'; # spent 3.16ms making 1 call to DateTime::TimeZone::Floating::BEGIN@9 # spent 3.15ms making 1 call to base::import
10
11					# spent 40µs within DateTime::TimeZone::Floating::new which was called 2 times, avg 20µs/call: # 2 times (40µs+0s) by DateTime::TimeZone::new at line 48 of DateTime/TimeZone.pm, avg 20µs/call sub new {
12	2	3µs			my $class = shift;
13
14	2	40µs			return bless {
15					name => 'floating',
16					offset => 0
17					}, $class;
18					}
19
20	4	10µs			# spent 5µs within DateTime::TimeZone::Floating::is_floating which was called 4 times, avg 1µs/call: # 2 times (3µs+0s) by DateTime::_calc_utc_rd at line 343 of DateTime.pm, avg 2µs/call # 2 times (2µs+0s) by DateTime::_calc_local_rd at line 384 of DateTime.pm, avg 1µs/call sub is_floating {1}
21
22					sub STORABLE_thaw {
23					my $self = shift;
24					my $cloning = shift;
25					my $serialized = shift;
26
27					my $class = ref $self \|\| $self;
28
29					my $obj;
30					if ( $class->isa(__PACKAGE__) ) {
31					$obj = __PACKAGE__->new();
32					}
33					else {
34					$obj = $class->new();
35					}
36
37					%$self = %$obj;
38
39					return $self;
40					}
41
42	1	4µs			1;
43
44					__END__