File Coverage

blib/lib/Armadito/Agent/HTTP/Client/ArmaditoAV/Event/OnDemandProgressEvent.pm

Criterion	Covered	Total	%
statement	12	20	60.0
branch	0	6	0.0
condition			n/a
subroutine	4	6	66.6
pod	2	2	100.0
total	18	34	52.9

package Armadito::Agent::HTTP::Client::ArmaditoAV::Event::OnDemandProgressEvent;

use strict;
use warnings;
use base 'Armadito::Agent::HTTP::Client::ArmaditoAV::Event';

use Armadito::Agent::Tools::Security qw(isANumber);

sub new {
	my ( $class, %params ) = @_;

	my $self = $class->SUPER::new(%params);

	# TODO: Add more validation
	die "Invalid malware_count."    if !isANumber( $self->{jobj}->{malware_count} );
	die "Invalid suspicious_count." if !isANumber( $self->{jobj}->{suspicious_count} );
	die "Invalid scanned_count."    if !isANumber( $self->{jobj}->{scanned_count} );

	return $self;
}

sub run {
	my ( $self, %params ) = @_;

	return $self;
}
1;

__END__

=head1 NAME

Armadito::Agent::HTTP::Client::ArmaditoAV::Event::OnDemandProgressEvent - ArmaditoAV OnDemandProgressEvent class

=head1 DESCRIPTION

This is the class dedicated to OnDemandProgressEvent of ArmaditoAV api.

=head1 FUNCTIONS

=head2 run ( $self, %params )

Run event related stuff.

=head2 new ( $class, %params )

Instanciate this class.