← 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/Assertion.pm
StatementsExecuted 12 statements in 209µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11117µs34µsPPIx::Regexp::Token::GroupType::Assertion::::BEGIN@32PPIx::Regexp::Token::GroupType::Assertion::BEGIN@32
11110µs16µsPPIx::Regexp::Token::GroupType::Assertion::::BEGIN@33PPIx::Regexp::Token::GroupType::Assertion::BEGIN@33
11110µs37µsPPIx::Regexp::Token::GroupType::Assertion::::BEGIN@37PPIx::Regexp::Token::GroupType::Assertion::BEGIN@37
1119µs786µsPPIx::Regexp::Token::GroupType::Assertion::::BEGIN@35PPIx::Regexp::Token::GroupType::Assertion::BEGIN@35
0000s0sPPIx::Regexp::Token::GroupType::Assertion::::__defining_stringPPIx::Regexp::Token::GroupType::Assertion::__defining_string
0000s0sPPIx::Regexp::Token::GroupType::Assertion::::perl_version_introducedPPIx::Regexp::Token::GroupType::Assertion::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::Assertion - Represent a look ahead or look behind assertion
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::Assertion> is a
14L<PPIx::Regexp::Token::GroupType|PPIx::Regexp::Token::GroupType>.
15
16C<PPIx::Regexp::Token::GroupType::Assertion> has no descendants.
17
18=head1 DESCRIPTION
19
20This class represents the parenthesized look ahead and look behind
21assertions.
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::Assertion;
31
32227µs250µs
# spent 34µs (17+17) within PPIx::Regexp::Token::GroupType::Assertion::BEGIN@32 which was called: # once (17µs+17µs) by PPIx::Regexp::Tokenizer::BEGIN@26 at line 32
use strict;
# spent 34µs making 1 call to PPIx::Regexp::Token::GroupType::Assertion::BEGIN@32 # spent 17µs making 1 call to strict::import
33228µs223µs
# spent 16µs (10+6) within PPIx::Regexp::Token::GroupType::Assertion::BEGIN@33 which was called: # once (10µs+6µs) by PPIx::Regexp::Tokenizer::BEGIN@26 at line 33
use warnings;
# spent 16µs making 1 call to PPIx::Regexp::Token::GroupType::Assertion::BEGIN@33 # spent 6µs making 1 call to warnings::import
34
35232µs21.56ms
# spent 786µs (9+777) within PPIx::Regexp::Token::GroupType::Assertion::BEGIN@35 which was called: # once (9µs+777µs) by PPIx::Regexp::Tokenizer::BEGIN@26 at line 35
use base qw{ PPIx::Regexp::Token::GroupType };
# spent 786µs making 1 call to PPIx::Regexp::Token::GroupType::Assertion::BEGIN@35 # spent 777µs making 1 call to base::import
36
372113µs265µs
# spent 37µs (10+28) within PPIx::Regexp::Token::GroupType::Assertion::BEGIN@37 which was called: # once (10µs+28µs) by PPIx::Regexp::Tokenizer::BEGIN@26 at line 37
use PPIx::Regexp::Constant qw{ MINIMUM_PERL };
# spent 37µs making 1 call to PPIx::Regexp::Token::GroupType::Assertion::BEGIN@37 # spent 28µs making 1 call to Exporter::import
38
391800nsour $VERSION = '0.036';
40
41{
4223µs my %perl_version_introduced = (
43 '?<=' => '5.005',
44 '?<!' => '5.005',
45 );
46
47 sub perl_version_introduced {
48 my ( $self ) = @_;
49 return $perl_version_introduced{ $self->unescaped_content() } ||
50 MINIMUM_PERL;
51 }
52}
53
54# Return true if the token can be quantified, and false otherwise
55# sub can_be_quantified { return };
56
57sub __defining_string {
58 return ( '?=', '?<=', '?!', '?<!' );
59}
60
6114µs1;
62
63__END__