← Index
NYTProf Performance Profile   « line view »
For /Users/timbo/perl5/perlbrew/perls/perl-5.18.2/bin/perlcritic
  Run on Sat Mar 19 22:12:22 2016
Reported on Sat Mar 19 22:14:14 2016

Filename/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/PPIx/Regexp/Token/GroupType/Subexpression.pm
StatementsExecuted 8 statements in 141µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11117µs34µsPPIx::Regexp::Token::GroupType::Subexpression::::BEGIN@32PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@32
11110µs16µsPPIx::Regexp::Token::GroupType::Subexpression::::BEGIN@33PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@33
1119µs86µsPPIx::Regexp::Token::GroupType::Subexpression::::BEGIN@35PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@35
0000s0sPPIx::Regexp::Token::GroupType::Subexpression::::__defining_stringPPIx::Regexp::Token::GroupType::Subexpression::__defining_string
0000s0sPPIx::Regexp::Token::GroupType::Subexpression::::perl_version_introducedPPIx::Regexp::Token::GroupType::Subexpression::perl_version_introduced
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1=head1 NAME
2
3PPIx::Regexp::Token::GroupType::Subexpression - Represent an independent subexpression marker
4
5=head1 SYNOPSIS
6
7 use PPIx::Regexp::Dumper;
8 PPIx::Regexp::Dumper->new( 'qr{foo(?>bar)}smx' )
9 ->print();
10
11=head1 INHERITANCE
12
13C<PPIx::Regexp::Token::GroupType::Subexpression> is a
14L<PPIx::Regexp::Token::GroupType|PPIx::Regexp::Token::GroupType>.
15
16C<PPIx::Regexp::Token::GroupType::Subexpression> has no descendants.
17
18=head1 DESCRIPTION
19
20This class represents the '?>' after a left parenthesis that identifies
21an independent subexpression.
22
23=head1 METHODS
24
25This class provides no public methods beyond those provided by its
26superclass.
27
28=cut
29
30package PPIx::Regexp::Token::GroupType::Subexpression;
31
32227µs251µs
# spent 34µs (17+17) within PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@32 which was called: # once (17µs+17µs) by PPIx::Regexp::Tokenizer::BEGIN@31 at line 32
use strict;
# spent 34µs making 1 call to PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@32 # spent 17µs making 1 call to strict::import
33228µs222µs
# spent 16µs (10+6) within PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@33 which was called: # once (10µs+6µs) by PPIx::Regexp::Tokenizer::BEGIN@31 at line 33
use warnings;
# spent 16µs making 1 call to PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@33 # spent 6µs making 1 call to warnings::import
34
35282µs2163µs
# spent 86µs (9+77) within PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@35 which was called: # once (9µs+77µs) by PPIx::Regexp::Tokenizer::BEGIN@31 at line 35
use base qw{ PPIx::Regexp::Token::GroupType };
# spent 86µs making 1 call to PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@35 # spent 77µs making 1 call to base::import
36
371700nsour $VERSION = '0.036';
38
39# Return true if the token can be quantified, and false otherwise
40# sub can_be_quantified { return };
41
42sub perl_version_introduced {
43 my ( $self ) = @_;
44 return '5.005';
45}
46
47sub __defining_string {
48 return '?>';
49}
50
5113µs1;
52
53__END__