← Index
NYTProf Performance Profile   « block view • line view • sub view »
For /usr/local/src/github.com/foswiki/core/bin/view
  Run on Sun Dec 4 17:17:59 2011
Reported on Sun Dec 4 17:26:35 2011

Filename/usr/local/src/github.com/foswiki/core/lib/Foswiki/Query/OP_length.pm
StatementsExecuted 14 statements in 390µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
31165µs147µsFoswiki::Query::OP_length::::newFoswiki::Query::OP_length::new
11124µs31µsFoswiki::Query::OP_length::::BEGIN@11Foswiki::Query::OP_length::BEGIN@11
11116µs34µsFoswiki::Query::OP_length::::BEGIN@12Foswiki::Query::OP_length::BEGIN@12
1119µs9µsFoswiki::Query::OP_length::::BEGIN@14Foswiki::Query::OP_length::BEGIN@14
0000s0sFoswiki::Query::OP_length::::evaluateFoswiki::Query::OP_length::evaluate
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1# See bottom of file for license and copyright information
2
3=begin TML
4
5---+ package Foswiki::Query::OP_length
6
7=cut
8
9package Foswiki::Query::OP_length;
10
11245µs238µs
# spent 31µs (24+7) within Foswiki::Query::OP_length::BEGIN@11 which was called: # once (24µs+7µs) by Foswiki::Query::Parser::BEGIN@59 at line 11
use strict;
# spent 31µs making 1 call to Foswiki::Query::OP_length::BEGIN@11 # spent 7µs making 1 call to strict::import
12244µs251µs
# spent 34µs (16+17) within Foswiki::Query::OP_length::BEGIN@12 which was called: # once (16µs+17µs) by Foswiki::Query::Parser::BEGIN@59 at line 12
use warnings;
# spent 34µs making 1 call to Foswiki::Query::OP_length::BEGIN@12 # spent 18µs making 1 call to warnings::import
13
142222µs19µs
# spent 9µs within Foswiki::Query::OP_length::BEGIN@14 which was called: # once (9µs+0s) by Foswiki::Query::Parser::BEGIN@59 at line 14
use Foswiki::Query::UnaryOP ();
# spent 9µs making 1 call to Foswiki::Query::OP_length::BEGIN@14
15110µsour @ISA = ('Foswiki::Query::UnaryOP');
16
17
# spent 147µs (65+82) within Foswiki::Query::OP_length::new which was called 3 times, avg 49µs/call: # 3 times (65µs+82µs) by Foswiki::Query::Parser::new at line 105 of /usr/local/src/github.com/foswiki/core/lib/Foswiki/Query/Parser.pm, avg 49µs/call
sub new {
18664µs my $class = shift;
19382µs return $class->SUPER::new( name => 'length', prec => 1000 );
# spent 82µs making 3 calls to Foswiki::Query::UnaryOP::new, avg 27µs/call
20}
21
22sub evaluate {
23 my $this = shift;
24 my $node = shift;
25 my $a = $node->{params}[0];
26 my $val = $a->evaluate(@_) || '';
27 return 0 unless defined $val;
28 if ( ref($val) eq 'ARRAY' ) {
29 return scalar(@$val);
30 }
31 elsif ( ref($val) eq 'HASH' ) {
32 return scalar( keys %$val );
33 }
34 elsif ( !ref($val) ) {
35 return length($val);
36 }
37 return 1;
38}
39
4016µs1;
41__END__