← Index
NYTProf Performance Profile   « block view • line view • sub view »
For 05.Domain_and_Item.t
  Run on Tue May 4 17:21:41 2010
Reported on Tue May 4 17:22:50 2010

File /usr/local/lib/perl5/site_perl/5.10.1/DateTime/TimeZone/UTC.pm
Statements Executed 275
Statement Execution Time 836µs
Subroutines — ordered by exclusive time
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
5422269µs269µsDateTime::TimeZone::UTC::::newDateTime::TimeZone::UTC::new
922190µs90µsDateTime::TimeZone::UTC::::is_utcDateTime::TimeZone::UTC::is_utc
371149µs49µsDateTime::TimeZone::UTC::::offset_for_local_datetimeDateTime::TimeZone::UTC::offset_for_local_datetime
241141µs41µsDateTime::TimeZone::UTC::::offset_for_datetimeDateTime::TimeZone::UTC::offset_for_datetime
11114µs17µsDateTime::TimeZone::UTC::::BEGIN@3DateTime::TimeZone::UTC::BEGIN@3
1116µs42µsDateTime::TimeZone::UTC::::BEGIN@9DateTime::TimeZone::UTC::BEGIN@9
1116µs24µsDateTime::TimeZone::UTC::::BEGIN@5DateTime::TimeZone::UTC::BEGIN@5
1114µs4µsDateTime::TimeZone::UTC::::BEGIN@8DateTime::TimeZone::UTC::BEGIN@8
0000s0sDateTime::TimeZone::UTC::::categoryDateTime::TimeZone::UTC::category
0000s0sDateTime::TimeZone::UTC::::is_dst_for_datetimeDateTime::TimeZone::UTC::is_dst_for_datetime
0000s0sDateTime::TimeZone::UTC::::short_name_for_datetimeDateTime::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
1package DateTime::TimeZone::UTC;
2
3323µs220µs
# spent 17µs (14+3) within DateTime::TimeZone::UTC::BEGIN@3 which was called # once (14µs+3µs) by DateTime::TimeZone::OffsetOnly::BEGIN@11 at line 3
use strict;
# spent 17µs making 1 call to DateTime::TimeZone::UTC::BEGIN@3 # spent 3µs making 1 call to strict::import
4
5326µs241µs
# spent 24µs (6+18) within DateTime::TimeZone::UTC::BEGIN@5 which was called # once (6µs+18µs) by DateTime::TimeZone::OffsetOnly::BEGIN@11 at line 5
use vars qw ($VERSION);
# spent 24µs making 1 call to DateTime::TimeZone::UTC::BEGIN@5 # spent 18µs making 1 call to vars::import
61400ns$VERSION = 0.01;
7
8320µs14µs
# spent 4µs within DateTime::TimeZone::UTC::BEGIN@8 which was called # once (4µs+0s) by DateTime::TimeZone::OffsetOnly::BEGIN@11 at line 8
use DateTime::TimeZone;
# spent 4µs making 1 call to DateTime::TimeZone::UTC::BEGIN@8
93106µs242µs
# spent 42µs (6+36) within DateTime::TimeZone::UTC::BEGIN@9 which was called # once (6µs+36µs) by DateTime::TimeZone::OffsetOnly::BEGIN@11 at line 9
use base 'DateTime::TimeZone';
# spent 42µs making 1 call to DateTime::TimeZone::UTC::BEGIN@9 # spent 36µs making 1 call to base::import, recursion: max depth 1, time 36µs
10
11
# spent 269µs within DateTime::TimeZone::UTC::new which was called 54 times, avg 5µs/call: # 44 times (231µs+0s) by DateTime::TimeZone::new at line 56 of DateTime/TimeZone.pm, avg 5µs/call # 10 times (39µs+0s) by DateTime::TimeZone::OffsetOnly::new at line 26 of DateTime/TimeZone/OffsetOnly.pm, avg 4µs/call
sub new {
12108306µs my $class = shift;
13
14 return bless { name => 'UTC' }, $class;
15}
16
17sub is_dst_for_datetime {0}
18
192463µs
# spent 41µs within DateTime::TimeZone::UTC::offset_for_datetime which was called 24 times, avg 2µs/call: # 24 times (41µs+0s) by DateTime::offset at line 905 of DateTime.pm, avg 2µs/call
sub offset_for_datetime {0}
203789µs
# spent 49µs within DateTime::TimeZone::UTC::offset_for_local_datetime which was called 37 times, avg 1µs/call: # 37 times (49µs+0s) by DateTime::_offset_for_local_datetime at line 908 of DateTime.pm, avg 1µs/call
sub offset_for_local_datetime {0}
21
22sub short_name_for_datetime {'UTC'}
23
24sub category {undef}
25
2692201µs
# spent 90µs within DateTime::TimeZone::UTC::is_utc which was called 92 times, avg 984ns/call: # 54 times (39µs+0s) by DateTime::_calc_local_rd at line 379 of DateTime.pm, avg 717ns/call # 38 times (52µs+0s) by DateTime::_calc_utc_rd at line 338 of DateTime.pm, avg 1µs/call
sub is_utc {1}
27
2813µs1;
29
30__END__
31
32=head1 NAME
33
34DateTime::TimeZone::UTC - The UTC time zone
35
36=head1 SYNOPSIS
37
38 my $utc_tz = DateTime::TimeZone::UTC->new;
39
40=head1 DESCRIPTION
41
42This class is used to provide the DateTime::TimeZone API needed by
43DateTime.pm for the UTC time zone, which is not explicitly included in
44the Olson time zone database.
45
46The offset for this object will always be zero.
47
48=head1 USAGE
49
50This class has the same methods as a real time zone object, but the
51C<category()> method returns undef and C<is_utc()> returns true.
52
53=head1 AUTHOR
54
55Dave Rolsky, <autarch@urth.org>
56
57=head1 COPYRIGHT & LICENSE
58
59Copyright (c) 2003-2008 David Rolsky. All rights reserved. This
60program is free software; you can redistribute it and/or modify it
61under the same terms as Perl itself.
62
63The full text of the license can be found in the LICENSE file included
64with this module.
65
66=cut