- skip 'chattr(1) not installed', $nr unless which('chattr');
- my $lsattr = which('lsattr') or skip 'lsattr(1) not installed', $nr;
- my $tmp = File::Temp->newdir('nodatacow-XXXXX', DIR => $dir);
+ require_cmd('chattr', 1) or skip 'chattr(1) not installed', $nr;
+ my $lsattr = require_cmd('lsattr', 1) or
+ skip 'lsattr(1) not installed', $nr;
+ my $tmp = File::Temp->newdir('nodatacow-XXXX', DIR => $dir);