line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
# $Id: Port.pm 142 2009-10-16 19:13:45Z jabra $ |
2
|
|
|
|
|
|
|
package Nikto::Parser::Host::Port; |
3
|
|
|
|
|
|
|
{ |
4
|
|
|
|
|
|
|
our $VERSION = '0.01'; |
5
|
|
|
|
|
|
|
$VERSION = eval $VERSION; |
6
|
|
|
|
|
|
|
|
7
|
1
|
|
|
1
|
|
1112
|
use Object::InsideOut; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
5
|
|
8
|
|
|
|
|
|
|
|
9
|
|
|
|
|
|
|
my @port : Field : Arg(port) : Get(port); |
10
|
|
|
|
|
|
|
my @banner : Field : Arg(banner) : Get(banner); |
11
|
|
|
|
|
|
|
my @start_scan_time : Field : Arg(start_scan_time) : Get(start_scan_time); |
12
|
|
|
|
|
|
|
my @end_scan_time : Field : Arg(end_scan_time) : Get(end_scan_time); |
13
|
|
|
|
|
|
|
my @elasped_scan_time : Field : Arg(elasped_scan_time) : |
14
|
|
|
|
|
|
|
Get(elasped_scan_time); |
15
|
|
|
|
|
|
|
my @siteip : Field : Arg(siteip) : Get(siteip); |
16
|
|
|
|
|
|
|
my @sitename : Field : Arg(sitename) : Get(sitename); |
17
|
|
|
|
|
|
|
my @items : Field : Arg(items) : Get(items) : |
18
|
|
|
|
|
|
|
Type(List(Nikto::Parser::Host::Port::Item)); |
19
|
|
|
|
|
|
|
my @items_tested : Field : Arg(items_tested) : Get(items_tested); |
20
|
|
|
|
|
|
|
my @items_found : Field : Arg(items_found) : Get(items_found); |
21
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
sub get_all_items { |
23
|
0
|
|
|
0
|
0
|
|
my ($self) = @_; |
24
|
0
|
|
|
|
|
|
my @items = @{ $self->items }; |
|
0
|
|
|
|
|
|
|
25
|
0
|
|
|
|
|
|
return @items; |
26
|
|
|
|
|
|
|
} |
27
|
|
|
|
|
|
|
} |
28
|
|
|
|
|
|
|
1; |