File Coverage

blib/lib/ExtUtils/XSpp/Node/PercAny.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 1 1 100.0
total 14 14 100.0


line stmt bran cond sub pod time code
1             package ExtUtils::XSpp::Node::PercAny;
2              
3 21     21   116 use strict;
  21         51  
  21         726  
4 21     21   108 use base 'ExtUtils::XSpp::Node';
  21         39  
  21         395  
5              
6             =head1 NAME
7              
8             ExtUtils::XSpp::Node::PercAny - contains information about %Foo tags handled by plugins
9              
10             =head1 DESCRIPTION
11              
12             Used internally during parsing.
13              
14             =cut
15              
16             sub init {
17 8     8 1 25 my( $this, %args ) = @_;
18              
19 8         34 $this->{NAME} = $args{any};
20 8         39 $this->{NAMED_ARGUMENTS} = $args{named};
21 8         29 $this->{POSITIONAL_ARGUMENTS} = $args{positional};
22             }
23              
24             1;