File Coverage

blib/lib/PPI/Token/Separator.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package PPI::Token::Separator;
2              
3             =pod
4              
5             =head1 NAME
6              
7             PPI::Token::Separator - The __DATA__ and __END__ tags
8              
9             =head1 INHERITANCE
10              
11             PPI::Token::Separator
12             isa PPI::Token::Word
13             isa PPI::Token
14             isa PPI::Element
15              
16             =head1 DESCRIPTION
17              
18             Although superficially looking like a normal L object,
19             when the C<__DATA__> and C<__END__> compiler tags appear at the beginning of
20             a line (on supposedly) their own line, these tags become file section
21             separators.
22              
23             The indicate that the time for Perl code is over, and the rest of the
24             file is dedicated to something else (data in the case of C<__DATA__>) or
25             to nothing at all (in the case of C<__END__>).
26              
27             =head1 METHODS
28              
29             This class has no methods beyond what is provided by its
30             L, L and L
31             parent classes.
32              
33             =cut
34              
35 64     64   385 use strict;
  64         112  
  64         1572  
36 64     64   274 use PPI::Token::Word ();
  64         119  
  64         2917  
37              
38             our $VERSION = '1.275';
39              
40             our @ISA = "PPI::Token::Word";
41              
42             1;
43              
44             =pod
45              
46             =head1 SUPPORT
47              
48             See the L in the main module.
49              
50             =head1 AUTHOR
51              
52             Adam Kennedy Eadamk@cpan.orgE
53              
54             =head1 COPYRIGHT
55              
56             Copyright 2001 - 2011 Adam Kennedy.
57              
58             This program is free software; you can redistribute
59             it and/or modify it under the same terms as Perl itself.
60              
61             The full text of the license can be found in the
62             LICENSE file included with this module.
63              
64             =cut