Perl readdir用法及代碼示例

描述

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

用法

以下是此函數的簡單語法 -

readdir DIRHANDLE

返回值

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

示例

以下是顯示其基本用法的示例代碼 -

#!/usr/bin/perl -w

$dirname = "/tmp";

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

執行上述代碼時，會產生以下結果 -

.
..
testdir