--- perl/trunk/test/getattr.t 2004/11/11 14:44:15 4 +++ perl/trunk/test/getattr.t 2005/12/21 15:33:37 18 @@ -35,8 +35,8 @@ my (@astat, @bstat); @astat = stat("$a"); @bstat = stat("$b"); -# dev and inode can legally change -shift(@astat); shift(@astat); -shift(@bstat); shift(@bstat); +# dev, inode and blksize can legally change +@astat = @astat[2..10,12]; +@bstat = @bstat[2..10,12]; is(join(" ",@astat),join(" ",@bstat),"stat()"); `rm -f $a`;