溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
這篇文章給大家分享的是有關從Perl目錄中分辨文件的方法的內容。小編覺得挺實用的，因此分享給大家做個參考。一起跟隨小編過來看看吧。
假設您正在構建一個Perl腳本來遍歷文件系統并記錄它找到的內容。當您打開文件句柄時，您需要知道您是在處理實際文件還是處理目錄，您可以區別對待。你想要一個目錄，所以你可以繼續遞歸地解析文件系統。從目錄告訴文件的最快方法是使用Perl內置的文件測試操作。Perl具有可用于測試文件不同方面的運算符。-f運算符用于標識常規文件而不是目錄或其他類型的文件。
使用-f文件測試操作員
#!/usr/bin/perl -w
$filename = '/path/to/your/file.doc';
$directoryname = '/path/to/your/directory';
if (-f $filename) {
print "This is a file.";
}
if (-d $directoryname) {
print "This is a directory.";
}首先，創建兩個字符串：一個指向文件，另一個指向目錄。接下來，使用-f運算符測試$ filename，它檢查某些內容是否為文件。
這將打印“這是一個文件”。如果在目錄上嘗試-f運算符，則不會打印。
然后，對$ directoryname執行相反的操作，并確認它實際上是一個目錄。將它與目錄glob 相結合，以排序哪些元素是文件，哪些是目錄：
#!/usr/bin/perl -w
@files = <*>;
foreach $file (@files) {
if (-f $file) {
print "This is a file: " . $file;
}
if (-d $file) {
print "This is a directory: " . $file;
}
}感謝各位的閱讀！關于從Perl目錄中分辨文件的方法就分享到這里了，希望以上內容可以對大家有一定的幫助，讓大家可以學到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到吧！
免責聲明：本站發布的內容（圖片、視頻和文字）以原創、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
