如何用perl分別出目錄或檔案
發表於 : 03/18/2003 5:47 pm
剛開始學perl遇到一個問題
若我有一個getdata.pl程式要開啟一個(數個)檔案並對其做處理
若我在terminal下perl getdata.pl dddd的命令
要怎麼寫才能讓getdata.pl判斷dddd是目錄或檔案
ps.我是有找到這一段程式碼,但是看不懂
有能人能幫我解釋這幾句程式的意思嗎
$addreout = $ARGV[0];
$addreout='./'.$addreout ;
if (! -d $addreout) {......} # it is a file
elsif (-d $addreout) {......} # it is a folder
我主要看不懂if (! -d $addreout) 這個判斷啦
若我有一個getdata.pl程式要開啟一個(數個)檔案並對其做處理
若我在terminal下perl getdata.pl dddd的命令
要怎麼寫才能讓getdata.pl判斷dddd是目錄或檔案
ps.我是有找到這一段程式碼,但是看不懂
有能人能幫我解釋這幾句程式的意思嗎
$addreout = $ARGV[0];
$addreout='./'.$addreout ;
if (! -d $addreout) {......} # it is a file
elsif (-d $addreout) {......} # it is a folder
我主要看不懂if (! -d $addreout) 這個判斷啦