From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

use strict;
use Test::More tests => 10;
my @filestats = qw(
fhalloc
fhfree
fhmax
inalloc
infree
inmax
dentries
unused
agelimit
wantpages
);
my $lxs = Sys::Statistics::Linux->new;
$lxs->set(filestats => 1);
my $stats = $lxs->get;
ok(defined $stats->filestats->{$_}, "checking filestats $_") for @filestats;