File Coverage

blib/lib/Software/Packager/Object/Rpm.pm
Criterion Covered Total %
statement 9 11 81.8
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 16 81.2


line stmt bran cond sub pod time code
1             ################################################################################
2             # Name: Software::Packager::Object::Rpm.pm
3             # Description: This module is used by Packager for holding data for a each item
4             #
5              
6             package Software::Packager::Object::Rpm;
7              
8             ####################
9             # Standard Modules
10 1     1   5 use strict;
  1         1  
  1         31  
11             #use File::Basename;
12             # Custom modules
13 1     1   4 use Software::Packager::Object;
  1         2  
  1         32  
14              
15             ####################
16             # Variables
17 1     1   5 use vars qw(@ISA @EXPORT @EXPORT_OK $VERSION);
  1         1  
  1         119  
18             @ISA = qw( Software::Packager::Object );
19             @EXPORT = qw();
20             @EXPORT_OK = qw();
21             $VERSION = 0.01;
22              
23             ####################
24             # Functions
25              
26             ################################################################################
27             # Function: kind()
28              
29             =head2 B
30              
31             This method returns the kind for this object.
32              
33             =cut
34             sub kind
35             {
36 0     0 1   my $self = shift;
37 0           return $self->get_value('KIND');
38             }
39              
40             1;
41             __END__