← Index
NYTProf Performance Profile   « line view »
For svc/members/upsert
  Run on Tue Jan 13 11:50:22 2015
Reported on Tue Jan 13 12:09:50 2015

Filename/usr/share/perl5/YAML/Tag.pm
StatementsExecuted 7 statements in 165µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11110µs22µsYAML::Node::::BEGIN@1YAML::Node::BEGIN@1
11110µs34µsYAML::Tag::::BEGIN@4 YAML::Tag::BEGIN@4
1117µs11µsYAML::Node::::BEGIN@1.9YAML::Node::BEGIN@1.9
0000s0sYAML::Tag::::__ANON__[:4] YAML::Tag::__ANON__[:4]
0000s0sYAML::Tag::::canonical YAML::Tag::canonical
0000s0sYAML::Tag::::new YAML::Tag::new
0000s0sYAML::Tag::::short YAML::Tag::short
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1478µs448µs
# spent 11µs (7+4) within YAML::Node::BEGIN@1.9 which was called: # once (7µs+4µs) by YAML::Node::BEGIN@4 at line 1 # spent 22µs (10+11) within YAML::Node::BEGIN@1 which was called: # once (10µs+11µs) by YAML::Node::BEGIN@4 at line 1
use strict; use warnings;
# spent 22µs making 1 call to YAML::Node::BEGIN@1 # spent 11µs making 1 call to YAML::Node::BEGIN@1.9 # spent 11µs making 1 call to strict::import # spent 4µs making 1 call to warnings::import
2package YAML::Tag;
3
4285µs259µs
# spent 34µs (10+25) within YAML::Tag::BEGIN@4 which was called: # once (10µs+25µs) by YAML::Node::BEGIN@4 at line 4
use overload '""' => sub { ${$_[0]} };
# spent 34µs making 1 call to YAML::Tag::BEGIN@4 # spent 25µs making 1 call to overload::import
5
6sub new {
7 my ($class, $self) = @_;
8 bless \$self, $class
9}
10
11sub short {
12 ${$_[0]}
13}
14
15sub canonical {
16 ${$_[0]}
17}
18
1912µs1;