我需要搜索以特定模式開頭的文件,例如「abc」。我還需要消除結果中以「.xh」結尾的所有文件。我不知道如何在Perl中做這件事。 我有這樣的事情: opendir(MYDIR, $newpath);
my @files = grep(/abc\*.*/,readdir(MYDIR)); # DOES NOT WORK
我還需要消除的結果,與結尾的所有文件 「·XH」 感謝,碧
我有這樣的功能: if (is_dir($dir)) {
//are we able to open it?
if ($dh = opendir($dir)) {
//Let's cycle
while (($subdir = readdir($dh)) !== false) {
if ($subdir != "." && $su
嗯,我知道這是另一個新手問題,但我非常沮喪,我期待再次開悟。在你們的指導下,我已經學會了如何使用glob函數來讀取目錄中每個文件的內容。現在我正在嘗試readdir-foreach組合來做同樣的事情,但我一直收到「無法打開文件:權限被拒絕」的錯誤。爲什麼這會發生在與管理員相同的目錄,相同的文件和相同的我。有人可以告訴我我做錯了什麼嗎?謝謝。 下面的代碼使用的glob功能,它的工作原理: #! pe
我有一個文件夾,裏面有很多子文件夾。在這些子文件夾中,我有很多需要閱讀的.html文件。我寫了下面的代碼來做到這一點。它打開父文件夾,也是第一個子文件夾,它只打印一個.html文件。它顯示錯誤: NO SUCH FILE OR DIRECTORY
我不想更改整個代碼。現有代碼中的任何修改對我都有好處。 use FileHandle;
opendir PAR_DIR,"D:\\PERL\\pe