請問如何在perl 給user 輸入一個絕對路徑目錄

本帖最后由 citiwang 于 2011-05-18 09:45 编辑

譬如說在 shell script 中是
echo "Please Input Work Dir  ?"
read addToPath  
並判別該目錄是否有*.gz 檔案存在
把要做的指令加在$addToPath 前就能達成想要帶到的目錄
for i in $datatype
do
            gzcat $addToPath/PM.$b.$fileday.*.xml.gz |grep $i  >> $addToPath/$i.log
done

IO::Prompt