Perl readdir()函數

perl readdir()函數例子，readdir()函數實例代碼 - 在標量上下文中，返回的下一個目錄條目的目錄關聯的DIRHANDLE。

語法

readdir DIRHANDLE

定義和用法

在標量上下文中，返回的下一個目錄條目的目錄關聯的DIRHANDLE。在列表上下文中，返回剩餘的所有DIRHANDLE目錄中的條目。

返回值

• 返回值：在標量上下文的目錄連接到DIRHANDLE的下一個文件的名稱。

• 返回值在數組上下文：列表中包含的所有連接到DIRHANDLE目錄文件。

例子

試試下麵的例子：

#!/usr/bin/perl -w
#by www.gitbook.net
$dirname = "/tmp";

opendir ( DIR, $dirname ) || die "Error in opening dir $dirname\n";
while( ($filename = readdir(DIR))){
     print("$filename\n");
}
closedir(DIR);

這將產生以下結果：

.
..
testdir