Filename | /Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/PPIx/Regexp/Token/GroupType/Subexpression.pm |
Statements | Executed 8 statements in 141µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 17µs | 34µs | BEGIN@32 | PPIx::Regexp::Token::GroupType::Subexpression::
1 | 1 | 1 | 10µs | 16µs | BEGIN@33 | PPIx::Regexp::Token::GroupType::Subexpression::
1 | 1 | 1 | 9µs | 86µs | BEGIN@35 | PPIx::Regexp::Token::GroupType::Subexpression::
0 | 0 | 0 | 0s | 0s | __defining_string | PPIx::Regexp::Token::GroupType::Subexpression::
0 | 0 | 0 | 0s | 0s | perl_version_introduced | PPIx::Regexp::Token::GroupType::Subexpression::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | =head1 NAME | ||||
2 | |||||
3 | PPIx::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 | |||||
13 | C<PPIx::Regexp::Token::GroupType::Subexpression> is a | ||||
14 | L<PPIx::Regexp::Token::GroupType|PPIx::Regexp::Token::GroupType>. | ||||
15 | |||||
16 | C<PPIx::Regexp::Token::GroupType::Subexpression> has no descendants. | ||||
17 | |||||
18 | =head1 DESCRIPTION | ||||
19 | |||||
20 | This class represents the '?>' after a left parenthesis that identifies | ||||
21 | an independent subexpression. | ||||
22 | |||||
23 | =head1 METHODS | ||||
24 | |||||
25 | This class provides no public methods beyond those provided by its | ||||
26 | superclass. | ||||
27 | |||||
28 | =cut | ||||
29 | |||||
30 | package PPIx::Regexp::Token::GroupType::Subexpression; | ||||
31 | |||||
32 | 2 | 27µs | 2 | 51µ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 # spent 34µs making 1 call to PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@32
# spent 17µs making 1 call to strict::import |
33 | 2 | 28µs | 2 | 22µ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 # spent 16µs making 1 call to PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@33
# spent 6µs making 1 call to warnings::import |
34 | |||||
35 | 2 | 82µs | 2 | 163µ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 # spent 86µs making 1 call to PPIx::Regexp::Token::GroupType::Subexpression::BEGIN@35
# spent 77µs making 1 call to base::import |
36 | |||||
37 | 1 | 700ns | our $VERSION = '0.036'; | ||
38 | |||||
39 | # Return true if the token can be quantified, and false otherwise | ||||
40 | # sub can_be_quantified { return }; | ||||
41 | |||||
42 | sub perl_version_introduced { | ||||
43 | my ( $self ) = @_; | ||||
44 | return '5.005'; | ||||
45 | } | ||||
46 | |||||
47 | sub __defining_string { | ||||
48 | return '?>'; | ||||
49 | } | ||||
50 | |||||
51 | 1 | 3µs | 1; | ||
52 | |||||
53 | __END__ |