← Index
NYTProf Performance Profile   « block view • line view • sub view »
For xt/tapper-mcp-scheduler-with-db-longrun.t
  Run on Tue May 22 17:18:39 2012
Reported on Tue May 22 17:23:57 2012

Filename/2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/x86_64-linux/DateTime/Helpers.pm
StatementsExecuted 12 statements in 120µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11112µs14µsDateTime::Helpers::::BEGIN@6DateTime::Helpers::BEGIN@6
11111µs18µsDateTime::Helpers::::BEGIN@7DateTime::Helpers::BEGIN@7
1113µs3µsDateTime::Helpers::::BEGIN@9DateTime::Helpers::BEGIN@9
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{
321µs $DateTime::Helpers::VERSION = '0.74';
4}
5
6316µs216µs
# spent 14µs (12+2) within DateTime::Helpers::BEGIN@6 which was called: # once (12µs+2µs) by DateTime::BEGIN@12 at line 6
use strict;
# spent 14µs making 1 call to DateTime::Helpers::BEGIN@6 # spent 2µs making 1 call to strict::import
7319µs225µs
# spent 18µs (11+7) within DateTime::Helpers::BEGIN@7 which was called: # once (11µs+7µs) by DateTime::BEGIN@12 at line 7
use warnings;
# spent 18µs making 1 call to DateTime::Helpers::BEGIN@7 # spent 7µs making 1 call to warnings::import
8
9382µs13µs
# spent 3µs within DateTime::Helpers::BEGIN@9 which was called: # once (3µs+0s) by DateTime::BEGIN@12 at line 9
use Scalar::Util ();
# spent 3µs 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
2712µs1;