File Coverage

blib/lib/MarpaX/Database/Terminfo/Constants.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1 18     18   123 use strict;
  18         43  
  18         934  
2 18     18   111 use warnings FATAL => 'all';
  18         47  
  18         1525  
3              
4             package MarpaX::Database::Terminfo::Constants;
5 18     18   115 use Exporter 'import';
  18         41  
  18         606  
6              
7 18     18   112 use constant TERMINFO_BOOLEAN => 0;
  18         49  
  18         1256  
8 18     18   100 use constant TERMINFO_NUMERIC => 1;
  18         329  
  18         874  
9 18     18   94 use constant TERMINFO_STRING => 2;
  18         35  
  18         3627  
10              
11             our @EXPORT_TYPES = qw/TERMINFO_BOOLEAN TERMINFO_NUMERIC TERMINFO_STRING/;
12              
13             our @EXPORT_OK = (@EXPORT_TYPES);
14             our %EXPORT_TAGS = ('all' => \@EXPORT_OK,
15             'types' => \@EXPORT_TYPES);
16              
17             # ABSTRACT: Terminfo constants
18              
19             our $VERSION = '0.010'; # VERSION
20              
21              
22             1;
23              
24             =pod
25              
26             =encoding utf-8
27              
28             =head1 NAME
29              
30             MarpaX::Database::Terminfo::Constants - Terminfo constants
31              
32             =head1 VERSION
33              
34             version 0.010
35              
36             =head1 SYNOPSIS
37              
38             use MarpaX::Database::Terminfo::Constants qw/:all/;
39              
40             my $terminfo_boolean = TERMINFO_BOOLEAN;
41              
42             =head1 DESCRIPTION
43              
44             This modules export terminfo interface constants.
45              
46             =head1 EXPORTS
47              
48             This module is exporting on demand the following tags:
49              
50             =over
51              
52             =item types
53              
54             The constants TERMINFO_BOOLEAN, TERMINFO_NUMERIC and TERMINFO_STRING.
55              
56             =item all
57              
58             All of the above.
59              
60             =back
61              
62             =head1 SEE ALSO
63              
64             L
65              
66             L
67              
68             =head1 AUTHOR
69              
70             jddurand
71              
72             =head1 CONTRIBUTOR
73              
74             Jean-Damien Durand
75              
76             =head1 COPYRIGHT AND LICENSE
77              
78             This software is copyright (c) 2013 by Jean-Damien Durand.
79              
80             This is free software; you can redistribute it and/or modify it under
81             the same terms as the Perl 5 programming language system itself.
82              
83             =cut
84              
85             __DATA__