File Coverage

lib/Rex/Hardware/Kernel.pm

Criterion	Covered	Total	%
statement	14	15	93.3
branch	1	2	50.0
condition			n/a
subroutine	4	4	100.0
pod	0	1	0.0
total	19	22	86.3

#
# (c) Jan Gehring
#

package Rex::Hardware::Kernel;

use v5.12.5;
use warnings;

our $VERSION = '1.14.2.2'; # TRIAL VERSION

use Rex::Helper::Run;

require Rex::Hardware;

sub get {

  my $cache          = Rex::get_cache();
  my $cache_key_name = $cache->gen_key_name("hardware.kernel");

  if ( $cache->valid($cache_key_name) ) {
    return $cache->get($cache_key_name);
  }

  my $data = {
    architecture  => i_run("uname -m"),
    kernel        => i_run("uname -s"),
    kernelrelease => i_run("uname -r"),
    kernelversion => i_run("uname -v"),
  };

  $cache->set( $cache_key_name, $data );

  return $data;

}

1;