← Index
Performance Profile   « block view • line view • sub view »
For t/test-parsing
  Run on Sun Nov 14 09:49:57 2010
Reported on Sun Nov 14 09:50:11 2010

File /usr/share/perl5/YAML/Tag.pm
Statements Executed 10
Total Time 0.0011505 seconds
Subroutines — ordered by exclusive time
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
0000s0sYAML::Tag::::BEGINYAML::Tag::BEGIN
0000s0sYAML::Tag::::__ANON__[:4]YAML::Tag::__ANON__[:4]
0000s0sYAML::Tag::::canonicalYAML::Tag::canonical
0000s0sYAML::Tag::::newYAML::Tag::new
0000s0sYAML::Tag::::shortYAML::Tag::short
LineStmts.Exclusive
Time
Avg.Code
1package YAML::Tag;
2682µs14µsuse strict; use warnings;
# spent 20µs making 1 call to warnings::import # spent 7µs making 1 call to strict::import
3
431.07ms355µsuse overload '""' => sub { ${$_[0]} };
# spent 50µ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µs2µs1;
20
21__END__
22
23=head1 NAME
24
25YAML::Tag - Tag URI object class for YAML
26
27=head1 SYNOPSIS
28
29 use YAML::Tag;
30
31=head1 DESCRIPTION
32
33Used by YAML::Node.
34
35=head1 AUTHOR
36
37Ingy döt Net <ingy@cpan.org>
38
39=head1 COPYRIGHT
40
41Copyright (c) 2006. Ingy döt Net. All rights reserved.
42
43This program is free software; you can redistribute it and/or modify it
44under the same terms as Perl itself.
45
46See L<http://www.perl.com/perl/misc/Artistic.html>
47
48=cut