← Index
NYTProf Performance Profile   « line view »
For -e
  Run on Thu Jun 30 16:16:00 2016
Reported on Thu Jun 30 16:16:08 2016

Filename/home/s1/perl5/perlbrew/perls/perl-5.22.1/lib/site_perl/5.22.1/DateTime/TimeZone/Floating.pm
StatementsExecuted 14 statements in 584µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
111470µs2.86msDateTime::TimeZone::Floating::::BEGIN@6DateTime::TimeZone::Floating::BEGIN@6
11123µs26µsDateTime::TimeZone::Floating::::BEGIN@3DateTime::TimeZone::Floating::BEGIN@3
11110µs15µsDateTime::TimeZone::Floating::::BEGIN@4DateTime::TimeZone::Floating::BEGIN@4
1115µs5µsDateTime::TimeZone::Floating::::_new_instanceDateTime::TimeZone::Floating::_new_instance
4215µs5µsDateTime::TimeZone::Floating::::is_floatingDateTime::TimeZone::Floating::is_floating
0000s0sDateTime::TimeZone::Floating::::STORABLE_thawDateTime::TimeZone::Floating::STORABLE_thaw
0000s0sDateTime::TimeZone::Floating::::newDateTime::TimeZone::Floating::new
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package DateTime::TimeZone::Floating;
21700ns$DateTime::TimeZone::Floating::VERSION = '1.98';
3231µs229µs
# spent 26µs (23+3) within DateTime::TimeZone::Floating::BEGIN@3 which was called: # once (23µs+3µs) by DateTime::TimeZone::BEGIN@9 at line 3
use strict;
# spent 26µs making 1 call to DateTime::TimeZone::Floating::BEGIN@3 # spent 3µs making 1 call to strict::import
4233µs221µs
# spent 15µs (10+6) within DateTime::TimeZone::Floating::BEGIN@4 which was called: # once (10µs+6µs) by DateTime::TimeZone::BEGIN@9 at line 4
use warnings;
# spent 15µs making 1 call to DateTime::TimeZone::Floating::BEGIN@4 # spent 6µs making 1 call to warnings::import
5
62480µs25.18ms
# spent 2.86ms (470µs+2.39) within DateTime::TimeZone::Floating::BEGIN@6 which was called: # once (470µs+2.39ms) by DateTime::TimeZone::BEGIN@9 at line 6
use parent 'Class::Singleton', 'DateTime::TimeZone::OffsetOnly';
# spent 2.86ms making 1 call to DateTime::TimeZone::Floating::BEGIN@6 # spent 2.32ms making 1 call to parent::import
7
8sub new {
9 return shift->instance;
10}
11
12
# spent 5µs within DateTime::TimeZone::Floating::_new_instance which was called: # once (5µs+0s) by Class::Singleton::instance at line 56 of Class/Singleton.pm
sub _new_instance {
131400ns my $class = shift;
14
1519µs return bless {
16 name => 'floating',
17 offset => 0
18 }, $class;
19}
20
21426µ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 395 of DateTime.pm, avg 2µs/call # 2 times (2µs+0s) by DateTime::_calc_local_rd at line 442 of DateTime.pm, avg 1µs/call
sub is_floating {1}
22
23sub STORABLE_thaw {
24 my $self = shift;
25 my $cloning = shift;
26 my $serialized = shift;
27
28 my $class = ref $self || $self;
29
30 my $obj;
31 if ( $class->isa(__PACKAGE__) ) {
32 $obj = __PACKAGE__->new();
33 }
34 else {
35 $obj = $class->new();
36 }
37
38 %$self = %$obj;
39
40 return $self;
41}
42
4314µs1;
44
45# ABSTRACT: A time zone that is always local
46
47__END__