| Filename | /usr/local/share/perl/5.10.1/DateTime/TimeZone/Floating.pm |
| Statements | Executed 22 statements in 475µs |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 364µs | 1.80ms | DateTime::TimeZone::Floating::BEGIN@10 |
| 2 | 1 | 1 | 23µs | 23µs | DateTime::TimeZone::Floating::new |
| 1 | 1 | 1 | 12µs | 24µs | DateTime::TimeZone::Floating::BEGIN@7 |
| 1 | 1 | 1 | 12µs | 12µs | DateTime::TimeZone::Floating::BEGIN@2 |
| 1 | 1 | 1 | 12µs | 12µs | DateTime::TimeZone::Floating::BEGIN@9 |
| 1 | 1 | 1 | 10µs | 14µs | DateTime::TimeZone::Floating::BEGIN@6 |
| 4 | 2 | 1 | 6µs | 6µs | DateTime::TimeZone::Floating::is_floating |
| 0 | 0 | 0 | 0s | 0s | DateTime::TimeZone::Floating::STORABLE_thaw |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package DateTime::TimeZone::Floating; | ||||
| 2 | # spent 12µs within DateTime::TimeZone::Floating::BEGIN@2 which was called:
# once (12µs+0s) by DateTime::TimeZone::BEGIN@12 at line 4 | ||||
| 3 | 1 | 6µs | $DateTime::TimeZone::Floating::VERSION = '1.31'; | ||
| 4 | 1 | 29µs | 1 | 12µs | } # spent 12µs making 1 call to DateTime::TimeZone::Floating::BEGIN@2 |
| 5 | |||||
| 6 | 3 | 32µs | 2 | 17µs | # spent 14µs (10+3) within DateTime::TimeZone::Floating::BEGIN@6 which was called:
# once (10µs+3µs) by DateTime::TimeZone::BEGIN@12 at line 6 # spent 14µs making 1 call to DateTime::TimeZone::Floating::BEGIN@6
# spent 3µs making 1 call to strict::import |
| 7 | 3 | 34µs | 2 | 37µs | # spent 24µs (12+12) within DateTime::TimeZone::Floating::BEGIN@7 which was called:
# once (12µs+12µs) by DateTime::TimeZone::BEGIN@12 at line 7 # spent 24µs making 1 call to DateTime::TimeZone::Floating::BEGIN@7
# spent 12µs making 1 call to warnings::import |
| 8 | |||||
| 9 | 3 | 40µs | 1 | 12µs | # spent 12µs within DateTime::TimeZone::Floating::BEGIN@9 which was called:
# once (12µs+0s) by DateTime::TimeZone::BEGIN@12 at line 9 # spent 12µs making 1 call to DateTime::TimeZone::Floating::BEGIN@9 |
| 10 | 3 | 292µs | 2 | 3.15ms | # spent 1.80ms (364µs+1.43) within DateTime::TimeZone::Floating::BEGIN@10 which was called:
# once (364µs+1.43ms) by DateTime::TimeZone::BEGIN@12 at line 10 # spent 1.80ms making 1 call to DateTime::TimeZone::Floating::BEGIN@10
# spent 1.35ms making 1 call to parent::import |
| 11 | |||||
| 12 | # spent 23µs within DateTime::TimeZone::Floating::new which was called 2 times, avg 12µs/call:
# 2 times (23µs+0s) by DateTime::TimeZone::new at line 49 of DateTime/TimeZone.pm, avg 12µs/call | ||||
| 13 | 4 | 27µs | my $class = shift; | ||
| 14 | |||||
| 15 | return bless { | ||||
| 16 | name => 'floating', | ||||
| 17 | offset => 0 | ||||
| 18 | }, $class; | ||||
| 19 | } | ||||
| 20 | |||||
| 21 | 4 | 12µs | # spent 6µ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 368 of DateTime.pm, avg 1µs/call
# 2 times (3µs+0s) by DateTime::_calc_local_rd at line 409 of DateTime.pm, avg 1µs/call | ||
| 22 | |||||
| 23 | sub 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 | |||||
| 43 | 1 | 2µs | 1; | ||
| 44 | |||||
| 45 | # ABSTRACT: A time zone that is always local | ||||
| 46 | |||||
| - - | |||||
| 49 | =pod | ||||
| 50 | |||||
| - - | |||||
| 89 | __END__ |