← Index
NYTProf Performance Profile   « block view • line view • sub view »
For mentat.storage.mongo.pl
  Run on Tue Jun 24 09:58:41 2014
Reported on Tue Jun 24 09:59:12 2014

Filename/usr/local/share/perl/5.14.2/DateTime/TimeZone/Floating.pm
StatementsExecuted 16 statements in 672µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
111578µs3.60msDateTime::TimeZone::Floating::::BEGIN@12DateTime::TimeZone::Floating::BEGIN@12
11122µs22µsDateTime::TimeZone::Floating::::_new_instanceDateTime::TimeZone::Floating::_new_instance
11119µs19µsDateTime::TimeZone::Floating::::BEGIN@5DateTime::TimeZone::Floating::BEGIN@5
11116µs27µsDateTime::TimeZone::Floating::::BEGIN@10DateTime::TimeZone::Floating::BEGIN@10
11116µs23µsDateTime::TimeZone::Floating::::BEGIN@9DateTime::TimeZone::Floating::BEGIN@9
4216µs6µ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;
2{
323µs $DateTime::TimeZone::Floating::VERSION = '1.63';
4}
5
# spent 19µs within DateTime::TimeZone::Floating::BEGIN@5 which was called: # once (19µs+0s) by DateTime::TimeZone::BEGIN@15 at line 7
BEGIN {
6112µs $DateTime::TimeZone::Floating::AUTHORITY = 'cpan:DROLSKY';
7144µs119µs}
# spent 19µs making 1 call to DateTime::TimeZone::Floating::BEGIN@5
8
9250µs230µs
# spent 23µs (16+7) within DateTime::TimeZone::Floating::BEGIN@9 which was called: # once (16µs+7µs) by DateTime::TimeZone::BEGIN@15 at line 9
use strict;
# spent 23µs making 1 call to DateTime::TimeZone::Floating::BEGIN@9 # spent 7µs making 1 call to strict::import
10255µs239µs
# spent 27µs (16+11) within DateTime::TimeZone::Floating::BEGIN@10 which was called: # once (16µs+11µs) by DateTime::TimeZone::BEGIN@15 at line 10
use warnings;
# spent 27µs making 1 call to DateTime::TimeZone::Floating::BEGIN@10 # spent 12µs making 1 call to warnings::import
11
122460µs26.49ms
# spent 3.60ms (578µs+3.02) within DateTime::TimeZone::Floating::BEGIN@12 which was called: # once (578µs+3.02ms) by DateTime::TimeZone::BEGIN@15 at line 12
use parent 'Class::Singleton', 'DateTime::TimeZone::OffsetOnly';
# spent 3.60ms making 1 call to DateTime::TimeZone::Floating::BEGIN@12 # spent 2.89ms making 1 call to parent::import
13
14sub new {
15 return shift->instance;
16}
17
18
# spent 22µs within DateTime::TimeZone::Floating::_new_instance which was called: # once (22µs+0s) by Class::Singleton::instance at line 58 of Class/Singleton.pm
sub _new_instance {
19227µs my $class = shift;
20
21 return bless {
22 name => 'floating',
23 offset => 0
24 }, $class;
25}
26
27416µs
# spent 6µs within DateTime::TimeZone::Floating::is_floating which was called 4 times, avg 2µs/call: # 2 times (4µs+0s) by DateTime::_calc_utc_rd at line 386 of DateTime.pm, avg 2µs/call # 2 times (3µs+0s) by DateTime::_calc_local_rd at line 427 of DateTime.pm, avg 1µs/call
sub is_floating {1}
28
29sub STORABLE_thaw {
30 my $self = shift;
31 my $cloning = shift;
32 my $serialized = shift;
33
34 my $class = ref $self || $self;
35
36 my $obj;
37 if ( $class->isa(__PACKAGE__) ) {
38 $obj = __PACKAGE__->new();
39 }
40 else {
41 $obj = $class->new();
42 }
43
44 %$self = %$obj;
45
46 return $self;
47}
48
4915µs1;
50
51# ABSTRACT: A time zone that is always local
52
53__END__