Lines Matching refs:stat

14 use File::stat;
19     my @stat = CORE::stat $file;
20     my $stat = File::stat::stat($file);
21     isa_ok($stat, 'File::stat', 'should build a stat object');
22     is_deeply($stat, \@stat, '... and matches the builtin');
43             is($stat->$meth, $stat[$i], "$desc in position $i");
48     my $stat2 = stat $file;
51     is_deeply($stat2, $stat, '... and matches the direct call');
56     my @stat = CORE::stat $file;
57     my $stat = File::stat::stat($file);
58     my $lstat = File::stat::lstat($file);
59     isa_ok($stat, 'File::stat', 'should build a stat object');
66         my $stat = $op eq 'l' ? $lstat : $stat;
75                     if ($w =~ /^File::stat ignores VMS ACLs/) {
77                     } elsif ($w =~ /^File::stat ignores use filetest 'access'/) {
123     my $orig_mode = (CORE::stat $pathname)[2];
148 my $stat = File::stat::stat($file);
149 isa_ok($stat, 'File::stat', 'should build a stat object');
158 	isa_ok(File::stat::stat('STAT'), 'File::stat',
163 	my $stat2 = File::stat::stat('STAT');
171 		$$stat3[8] = $$stat[8];
178 	main::is_deeply($stat, $stat3, '... and must match normal stat');
189     my $pstat = File::stat::stat($rh);
190     ok(!-p($stat), "-p should be false on a file");