| File | /usr/share/perl5/YAML/Tag.pm |
| Statements Executed | 10 |
| Total Time | 0.0011505 seconds |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 0 | 0 | 0 | 0s | 0s | YAML::Tag::BEGIN |
| 0 | 0 | 0 | 0s | 0s | YAML::Tag::__ANON__[:4] |
| 0 | 0 | 0 | 0s | 0s | YAML::Tag::canonical |
| 0 | 0 | 0 | 0s | 0s | YAML::Tag::new |
| 0 | 0 | 0 | 0s | 0s | YAML::Tag::short |
| Line | Stmts. | Exclusive Time | Avg. | Code |
|---|---|---|---|---|
| 1 | package YAML::Tag; | |||
| 2 | 6 | 82µs | 14µs | use strict; use warnings; # spent 20µs making 1 call to warnings::import
# spent 7µs making 1 call to strict::import |
| 3 | ||||
| 4 | 3 | 1.07ms | 355µs | use overload '""' => sub { ${$_[0]} }; # spent 50µs making 1 call to overload::import |
| 5 | ||||
| 6 | sub new { | |||
| 7 | my ($class, $self) = @_; | |||
| 8 | bless \$self, $class | |||
| 9 | } | |||
| 10 | ||||
| 11 | sub short { | |||
| 12 | ${$_[0]} | |||
| 13 | } | |||
| 14 | ||||
| 15 | sub canonical { | |||
| 16 | ${$_[0]} | |||
| 17 | } | |||
| 18 | ||||
| 19 | 1 | 2µs | 2µs | 1; |
| 20 | ||||
| 21 | __END__ | |||
| 22 | ||||
| 23 | =head1 NAME | |||
| 24 | ||||
| 25 | YAML::Tag - Tag URI object class for YAML | |||
| 26 | ||||
| 27 | =head1 SYNOPSIS | |||
| 28 | ||||
| 29 | use YAML::Tag; | |||
| 30 | ||||
| 31 | =head1 DESCRIPTION | |||
| 32 | ||||
| 33 | Used by YAML::Node. | |||
| 34 | ||||
| 35 | =head1 AUTHOR | |||
| 36 | ||||
| 37 | Ingy döt Net <ingy@cpan.org> | |||
| 38 | ||||
| 39 | =head1 COPYRIGHT | |||
| 40 | ||||
| 41 | Copyright (c) 2006. Ingy döt Net. All rights reserved. | |||
| 42 | ||||
| 43 | This program is free software; you can redistribute it and/or modify it | |||
| 44 | under the same terms as Perl itself. | |||
| 45 | ||||
| 46 | See L<http://www.perl.com/perl/misc/Artistic.html> | |||
| 47 | ||||
| 48 | =cut |