← 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:13 2016

Filename/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/PPIx/Regexp/Structure/Quantifier.pm
StatementsExecuted 8 statements in 113µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11112µs23µsPPIx::Regexp::Structure::Quantifier::::BEGIN@32PPIx::Regexp::Structure::Quantifier::BEGIN@32
1117µs62µsPPIx::Regexp::Structure::Quantifier::::BEGIN@35PPIx::Regexp::Structure::Quantifier::BEGIN@35
1117µs11µsPPIx::Regexp::Structure::Quantifier::::BEGIN@33PPIx::Regexp::Structure::Quantifier::BEGIN@33
0000s0sPPIx::Regexp::Structure::Quantifier::::__PPIX_LEXER__record_capture_numberPPIx::Regexp::Structure::Quantifier::__PPIX_LEXER__record_capture_number
0000s0sPPIx::Regexp::Structure::Quantifier::::can_be_quantifiedPPIx::Regexp::Structure::Quantifier::can_be_quantified
0000s0sPPIx::Regexp::Structure::Quantifier::::is_quantifierPPIx::Regexp::Structure::Quantifier::is_quantifier
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::Structure::Quantifier - Represent curly bracket quantifiers
4
5=head1 SYNOPSIS
6
7 use PPIx::Regexp::Dumper;
8 PPIx::Regexp::Dumper->new( 'qr{fo{2,}}smx' )
9 ->print();
10
11=head1 INHERITANCE
12
13C<PPIx::Regexp::Structure::Quantifier> is a
14L<PPIx::Regexp::Structure|PPIx::Regexp::Structure>.
15
16C<PPIx::Regexp::Structure::Quantifier> has no descendants.
17
18=head1 DESCRIPTION
19
20This class represents curly bracket quantifiers such as C<{3}>, C<{3,}>
21and C<{3,5}>. The contents are left as literals or interpolations.
22
23=head1 METHODS
24
25This class provides no public methods beyond those provided by its
26superclass.
27
28=cut
29
30package PPIx::Regexp::Structure::Quantifier;
31
32218µs235µs
# spent 23µs (12+12) within PPIx::Regexp::Structure::Quantifier::BEGIN@32 which was called: # once (12µs+12µs) by PPIx::Regexp::Lexer::BEGIN@54 at line 32
use strict;
# spent 23µs making 1 call to PPIx::Regexp::Structure::Quantifier::BEGIN@32 # spent 12µs making 1 call to strict::import
33220µs215µs
# spent 11µs (7+4) within PPIx::Regexp::Structure::Quantifier::BEGIN@33 which was called: # once (7µs+4µs) by PPIx::Regexp::Lexer::BEGIN@54 at line 33
use warnings;
# spent 11µs making 1 call to PPIx::Regexp::Structure::Quantifier::BEGIN@33 # spent 4µs making 1 call to warnings::import
34
35272µs2118µs
# spent 62µs (7+55) within PPIx::Regexp::Structure::Quantifier::BEGIN@35 which was called: # once (7µs+55µs) by PPIx::Regexp::Lexer::BEGIN@54 at line 35
use base qw{ PPIx::Regexp::Structure };
# spent 62µs making 1 call to PPIx::Regexp::Structure::Quantifier::BEGIN@35 # spent 55µs making 1 call to base::import
36
371600nsour $VERSION = '0.036';
38
39sub can_be_quantified {
40 return;
41}
42
43sub is_quantifier {
44 return 1;
45}
46
47# Called by the lexer to record the capture number.
48sub __PPIX_LEXER__record_capture_number {
49 my ( $self, $number ) = @_;
50 return $number;
51}
52
5312µs1;
54
55__END__