You can use the -d file test to check if the file is a directory before moving it.
unless(-d $whatever_file){
do whatever...
-Original Message-
From: Shu Hung () [mailto:[EMAIL PROTECTED]
Sent: Fri 6/11/2004 3:50 AM
To: Perl Beginner Mail Group
Cc:
Subject: search and move
Tim Johnson :
You can use the -d file test to check if the file is a directory before moving it.
unless(-d $whatever_file){
do whatever...
-Original Message-
From: Shu Hung () [mailto:[EMAIL PROTECTED]
Sent: Fri 6/11/2004 3:50 AM
To: Perl Beginner Mail Group
Cc:
Subject: search