unless (LS_HAS_EXTENDED) {
plan skip_all => 'your kernel does not support extended sysinfo fields';
} else {
- plan tests => 4;
+ plan tests => 4 * 5;
- my $si = sysinfo;
- ok(defined $si);
+ for (1 .. 5) {
+ my $si = sysinfo;
+ ok(defined $si);
- ok(exists $si->{$_}) for qw/totalhigh freehigh mem_unit/;
+ ok(exists $si->{$_}) for qw/totalhigh freehigh mem_unit/;
+ }
}