它在文档中的哪个位置表示虽然测试readdir用于定义？

另请参阅：readdir的“0”如何在while条件下不是false？ （不重复;只是密切相关。） 它在文档中的哪个位置表示虽然测试readdir用于定义？例如，这段代码

#!/usr/bin/perl

use strict;
use warnings;

opendir my $dir, "/tmp" or die "$!";

while (my $file = readdir($dir)) {
        print "$filen";
}
closedir $dir;

当运行B :: Deparse时：

use warnings;
use strict 'refs';
die "$!" unless opendir my $dir, '/tmp';
while (defined(my $file = readdir $dir)) {
    do {
        print "$filen"
    };
}
z.pl syntax OK

我期待这种行为，但我找不到它的指定位置。在perlop的I / O运算符部分，它说   以下行是等效的：      ＆NBSP;＆NBSP;＆NBSP;＆NBSP;

while (defined($_ = <STDIN>)) { print; }

  ＆NBSP;＆NBSP;＆NBSP;＆NBSP;

while ($_ = <STDIN>) { print; }

  ＆NBSP;＆NBSP;＆NBSP;＆NBSP;

while (<STDIN>) { print; }

  ＆NBSP;＆NBSP;＆NBSP;＆NBSP;

for (;<STDIN>;) { print; }

  ＆NBSP;＆NBSP;＆NBSP;＆NBSP;

print while defined($_ = <STDIN>);

  ＆NBSP;＆NBSP;＆NBSP;＆NBSP;

print while ($_ = <STDIN>);

  ＆NBSP;＆NBSP;＆NBSP;＆NBSP;

print while <STDIN>;

但是没有提到

readdir

。