如何用perl分別出目錄或檔案

[風鈴貓]

剛開始學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) 這個判斷啦

[bryanchang]

-d 就是表示「如果是檔案夾」的意思。這就好比 -e 是表示「如果存在」的意思是一樣的。