Hello,
I am trying to verify if a file exists on a network drive
(\\drive\volume\etc).
The name of the files I am trying to verify are located in a text file, and
are written in the above format.
The following code does not seem to work ...
open (INF, "system.txt"); #read file
@file_txt=<INF>;
close(INF);
foreach $val (@file_txt) {
chomp($val);
$val=~s#\\#/#gi; # replace '\' with '/'
($exist)=stat($val);
if ($exist) {
print "$val - exists";
}
}
your help is appreciated .
Roee Rubin
[EMAIL PROTECTED]
---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
[EMAIL PROTECTED]
For non-automated Mailing List support, send email to
[EMAIL PROTECTED]
