Problem code:
## This directory is set as writeable in the Web Server (IIS4) and is shared
in NT4 as Full
$token_directory = 'D:\\~Server\\andcable\\cgi-bin\\tokens\\';
do
{
$unique_id = &zero_fill(abs($$),3) .
&zero_fill(int(rand($rand_len)),$id_length - 3);
$token_file_name = "$token_directory$unique_id";
}
until (! (-e $token_file_name));
## Now, this is where it fails
open(token_file, ">$token_file_name") || &err_trap("Cannot open
$token_file_name for writing");
What simple thing am I missing here? My head already has too many bumps on
it to keep hitting my head against the wall. This worked on Unix, so what
is the prob with NT? Is there another way to set permissions on NT?
John Lester
[EMAIL PROTECTED]
Kirker Enterprises
http://www.kirkerenterprises.com/
_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web
