4 use System::Introspector::MountPoints;
6 my $probe = System::Introspector::MountPoints->new;
7 my $data = $probe->gather;
9 ok $data->{fstab}, 'received fstab data';
10 ok $data->{mtab}, 'received mtab data';
24 for my $field (@fields) {
25 ok not(grep { not defined $_->{$field} } @$tab),
31 subtest fstab => $run_test->($data->{fstab});
32 subtest mtab => $run_test->($data->{mtab});