File Coverage

blib/lib/Tie/Array/NoOp.pm
Criterion Covered Total %
statement 0 4 0.0
branch n/a
condition n/a
subroutine 0 15 0.0
pod n/a
total 0 19 0.0


line stmt bran cond sub pod time code
1             ## no critic: TestingAndDebugging::RequireUseStrict
2             package Tie::Array::NoOp;
3              
4             # IFUNBUILT
5             # use strict;
6             # END IFUNBUILT
7              
8             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
9             our $DATE = '2023-12-27'; # DATE
10             our $DIST = 'Tie-Array-NoOp'; # DIST
11             our $VERSION = '0.002'; # VERSION
12              
13             sub TIEARRAY {
14 0     0     my $class = shift;
15              
16 0           bless [], $class;
17             }
18              
19       0     sub FETCH {}
20              
21       0     sub STORE {}
22              
23 0     0     sub FETCHSIZE {1}
24              
25 0     0     sub STORESIZE {1}
26              
27       0     sub EXTEND {}
28              
29       0     sub EXISTS {}
30              
31       0     sub DELETE {}
32              
33       0     sub CLEAR {}
34              
35       0     sub PUSH {}
36              
37       0     sub POP {}
38              
39       0     sub SHIFT {}
40              
41       0     sub UNSHIFT {}
42              
43       0     sub SPLICE {}
44              
45       0     sub UNTIE {}
46              
47             # DESTROY
48              
49             1;
50             # ABSTRACT: Tied array that does nothing
51              
52             __END__