1
2use strict;
3use Class::Generate qw(class);
4
5class 'Nmap::Scanner::Task' => {
6    qw(name        $
7       begin_time  $
8       end_time    $),
9    '&as_xml' => q!
10
11    return qq(<taskbegin task="$name" time="$begin_time"/>\n) .
12           qq(<taskend task="$name" time="$end_time"/>\n);
13
14    !
15};
16
17=pod
18
19=head1 DESCRIPTION
20
21This class represents Nmap live task status messages (taskend and
22taskbegin elements in XML).
23
24=head1 PROPERTIES
25
26=head2 name()
27
28=head2 begin_time()
29
30=head2 end_time()
31
32=cut
33
341;
35