File Coverage

blib/lib/PPIx/Regexp/Structure/Atomic_Script_Run.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 19 19 100.0


line stmt bran cond sub pod time code
1             package PPIx::Regexp::Structure::Atomic_Script_Run;
2              
3 9     9   146 use 5.006;
  9         26  
4              
5 9     9   54 use strict;
  9         11  
  9         169  
6 9     9   32 use warnings;
  9         13  
  9         422  
7              
8 9     9   46 use base qw{ PPIx::Regexp::Structure };
  9         13  
  9         800  
9              
10 9     9   83 use PPIx::Regexp::Constant qw{ @CARP_NOT };
  9         13  
  9         928  
11              
12             our $VERSION = '0.091';
13              
14             1;
15              
16             __END__
17              
18             =head1 NAME
19              
20             PPIx::Regexp::Structure::Atomic_Script_Run - Represent an atomic script run group
21              
22             =head1 SYNOPSIS
23              
24             use PPIx::Regexp::Dumper;
25             PPIx::Regexp::Dumper->new( 'qr{(*atomic_script_run:\d)}' )
26             ->print();
27              
28             =head1 INHERITANCE
29              
30             C<PPIx::Regexp::Structure::Atomic_Script_Run> is a
31             L<PPIx::Regexp::Structure|PPIx::Regexp::Structure>.
32              
33             C<PPIx::Regexp::Structure::Atomic_Script_Run> has no descendants.
34              
35             =head1 DESCRIPTION
36              
37             This class represents an atomic script run group. That is, the
38             constructions C<(*atomic_script_run:...)> and C<(*asr:...)>. These are
39             new with Perl 5.27.9.
40              
41             If this construction does not make it into Perl 5.28, this class will be
42             retracted.
43              
44             =head1 METHODS
45              
46             This class provides no public methods beyond those provided by its
47             superclass.
48              
49             =head1 SUPPORT
50              
51             Support is by the author. Please file bug reports at
52             L<https://rt.cpan.org/Public/Dist/Display.html?Name=PPIx-Regexp>,
53             L<https://github.com/trwyant/perl-PPIx-Regexp/issues>, or in
54             electronic mail to the author.
55              
56             =head1 AUTHOR
57              
58             Thomas R. Wyant, III F<wyant at cpan dot org>
59              
60             =head1 COPYRIGHT AND LICENSE
61              
62             Copyright (C) 2018-2023, 2025 by Thomas R. Wyant, III
63              
64             This program is free software; you can redistribute it and/or modify it
65             under the same terms as Perl 5.10.0. For more details, see the full text
66             of the licenses in the directory LICENSES.
67              
68             This program is distributed in the hope that it will be useful, but
69             without any warranty; without even the implied warranty of
70             merchantability or fitness for a particular purpose.
71              
72             =cut
73              
74             # ex: set textwidth=72 :