File Coverage

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

Criterion	Covered	Total	%
statement	12	18	66.6
branch	0	2	0.0
condition	0	3	0.0
subroutine	4	5	80.0
pod	0	1	0.0
total	16	29	55.1

package App::Slackeria::Plugin::Whohas;

use strict;
use warnings;
use 5.010;

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

our $VERSION = '0.12';

sub run_whohas {
	my ( $self, $distro, $name ) = @_;

	my $out = qx{whohas --no-threads --strict -d $distro $name};

	if ( not defined $out or $out eq q{} ) {
		die("not found\n");
	}

	$out = ( split( /\n/, $out ) )[-1];

	return {
		data => substr( $out, 51, 10 ),
		href => substr( $out, 112 ),
	};
}

1;

__END__