File Coverage

blib/lib/OS/Package/System.pm

Criterion	Covered	Total	%
statement	10	12	83.3
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod			n/a
total	14	16	87.5

use v5.14.0;
use warnings;

package OS::Package::System;

# ABSTRACT: Determine OS version and type.
our $VERSION = '0.2.5'; # VERSION

use Moo;
use Types::Standard qw( Str Enum );
use Config;
use POSIX qw( uname );

has 'os' => (
    is       => 'rw',
    isa      => Str,
    default  => sub { return $Config{osname} },
    required => 1
);

has 'version' => (
    is       => 'rw',
    isa      => Str,
    default  => sub { my @uname = uname(); return $uname[2] },
    required => 1
);

has 'type' => (
    is       => 'rw',
    isa      => Str,
    default  => sub { my @uname = uname(); return $uname[4] },
    required => 1
);

#has 'bits' => ( is => 'rw', isa => Enum[qw[ 32 64 ]], required => 1 );

1;

__END__