File Coverage

blib/lib/App/Slackeria/Plugin/CPAN.pm

Criterion	Covered	Total	%
statement	15	26	57.6
branch	0	2	0.0
condition	0	2	0.0
subroutine	5	7	71.4
pod	1	2	50.0
total	21	39	53.8

package App::Slackeria::Plugin::CPAN;

use strict;
use warnings;
use 5.010;

use parent 'App::Slackeria::Plugin';

use CPANPLUS;

our $VERSION = '0.12';

sub new {
	my ( $obj, %conf ) = @_;
	my $ref = {};
	$ref->{default} = \%conf;
	$ref->{default}->{href} //= 'http://search.cpan.org/dist/%s/';
	$ref->{cb} = CPANPLUS::Backend->new();
	return bless( $ref, $obj );
}

sub check {
	my ($self) = @_;
	my $mod = $self->{cb}->parse_module( module => $self->{conf}->{name} );

	if ($mod) {
		return { data => $mod->version(), };
	}
	else {
		die("not found\n");
	}
}

1;

__END__