← Index
NYTProf Performance Profile   « block view • line view • sub view »
For -e
  Run on Sun Aug 5 15:24:32 2012
Reported on Sun Aug 5 15:24:51 2012

Filename/usr/lib/perl5/site_perl/5.12.4/i686-linux/DateTime/Helpers.pm
StatementsExecuted 12 statements in 1.22ms
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
1113.82ms10.4msDateTime::Helpers::::BEGIN@9DateTime::Helpers::BEGIN@9
11179µs103µsDateTime::Helpers::::BEGIN@6DateTime::Helpers::BEGIN@6
11150µs157µsDateTime::Helpers::::BEGIN@7DateTime::Helpers::BEGIN@7
0000s0sDateTime::Helpers::::canDateTime::Helpers::can
0000s0sDateTime::Helpers::::isaDateTime::Helpers::isa
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package DateTime::Helpers;
2{
3212µs $DateTime::Helpers::VERSION = '0.76';
4}
5
63143µs2126µs
# spent 103µs (79+24) within DateTime::Helpers::BEGIN@6 which was called: # once (79µs+24µs) by DateTime::Duration::BEGIN@11 at line 6
use strict;
# spent 103µs making 1 call to DateTime::Helpers::BEGIN@6 # spent 24µs making 1 call to strict::import
73153µs2264µs
# spent 157µs (50+107) within DateTime::Helpers::BEGIN@7 which was called: # once (50µs+107µs) by DateTime::Duration::BEGIN@11 at line 7
use warnings;
# spent 157µs making 1 call to DateTime::Helpers::BEGIN@7 # spent 107µs making 1 call to warnings::import
8
93872µs110.4ms
# spent 10.4ms (3.82+6.54) within DateTime::Helpers::BEGIN@9 which was called: # once (3.82ms+6.54ms) by DateTime::Duration::BEGIN@11 at line 9
use Scalar::Util ();
# spent 10.4ms making 1 call to DateTime::Helpers::BEGIN@9
10
11sub can {
12 my $object = shift;
13 my $method = shift;
14
15 return unless Scalar::Util::blessed($object);
16 return $object->can($method);
17}
18
19sub isa {
20 my $object = shift;
21 my $method = shift;
22
23 return unless Scalar::Util::blessed($object);
24 return $object->isa($method);
25}
26
27140µs1;