File Coverage

blib/lib/NIST/NVD.pm
Criterion Covered Total %
statement 9 16 56.2
branch n/a
condition 0 3 0.0
subroutine 3 5 60.0
pod 2 2 100.0
total 14 26 53.8


line stmt bran cond sub pod time code
1             package NIST::NVD;
2              
3 2     2   34917 use warnings;
  2         4  
  2         69  
4 2     2   11 use strict;
  2         5  
  2         67  
5 2     2   5066 use LWP::UserAgent;
  2         142038  
  2         338  
6              
7             =head1 NAME
8              
9             NIST::NVD - Fetch and convert NIST's NVD feeds
10              
11             =head1 VERSION
12              
13             Version 1.00.00
14              
15             =cut
16              
17             our $VERSION = '1.00.00';
18              
19             =head1 SYNOPSIS
20              
21             my $nvd = NIST::NVD->new( store => 'DB_File',
22             db_path => $db_path,
23             );
24             $nvd->update();
25              
26             =head1 SUBROUTINES/METHODS
27              
28             =head2 new
29              
30             my $nvd = NIST::NVD->new( store => 'DB_File',
31             db_path => $db_path,
32             );
33              
34             =cut
35              
36             sub new {
37              
38 0     0 1   my ( $class, %args ) = @_;
39              
40 0   0       $class = ref $class || $class;
41              
42 0           bless {}, $class;
43              
44             }
45              
46             =head2 update
47              
48             my $result = $nvd->update();
49              
50             Not yet implemented. Stubbed out while other features are completed.
51              
52             =cut
53              
54             sub update {
55 0     0 1   my ( $self, %args ) = @_;
56              
57 0           my $quick_url = 'http://nvd.nist.gov/download/nvd-rss.xml';
58 0           my $complete_url = 'http://nvd.nist.gov/download/nvd-rss-analyzed.xml';
59              
60 0           return 1;
61             }
62              
63             =head1 AUTHOR
64              
65             C.J. Adams-Collier, C<< <cjac at f5.com> >>
66              
67             =head1 BUGS
68              
69             Please report any bugs or feature requests to C<bug-nist-nvd at rt.cpan.org>, or through
70             the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=NIST-NVD>. I will be notified, and then you'll
71             automatically be notified of progress on your bug as I make changes.
72              
73             =head1 SUPPORT
74              
75             You can find documentation for this module with the perldoc command.
76              
77             perldoc NIST::NVD
78              
79              
80             You can also look for information at:
81              
82             =over 4
83              
84             =item * RT: CPAN's request tracker
85              
86             L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=NIST-NVD>
87              
88             =item * AnnoCPAN: Annotated CPAN documentation
89              
90             L<http://annocpan.org/dist/NIST-NVD>
91              
92             =item * CPAN Ratings
93              
94             L<http://cpanratings.perl.org/d/NIST-NVD>
95              
96             =item * Search CPAN
97              
98             L<http://search.cpan.org/dist/NIST-NVD/>
99              
100             =back
101              
102             =head1 ACKNOWLEDGEMENTS
103              
104              
105             =head1 LICENSE AND COPYRIGHT
106              
107             Copyright 2011, 2012 F5 Networks, Inc.
108              
109             CVE(r) and CWE(tm) are marks of The MITRE Corporation and used here with
110             permission. The information in CVE and CWE are copyright of The MITRE
111             Corporation and also used here with permission.
112              
113             Please include links for CVE(r) <http://cve.mitre.org/> and CWE(tm)
114             <http://cwe.mitre.org/> in all reproductions of these materials.
115              
116             This program is free software; you can redistribute it and/or modify it
117             under the terms of either: the GNU General Public License as published
118             by the Free Software Foundation; or the Artistic License.
119              
120             See http://dev.perl.org/licenses/ for more information.
121              
122              
123             =cut
124              
125             1; # End of NIST::NVD