Permission Denied

[rajiv07]

Hi to all,

I have a simple script to write something in to a file and read from the file.But it gives Permission Denied error

My Script

#!C:\Program Files\SWsoft\Plesk\Additional\Perl\bin\perl.exe
use CGI::Carp 'fatalsToBrowser';
use strict;
use warnings;
use CGI;
 
my $file="C:/Inetpub/vhosts/imi.in/cgi-bin/elearning/query/1.html";
 
chmod(0755,'C:/Inetpub/vhosts/imi.in/cgi-bin/elearning/query/');
 
open(FH,">$file") or die $!;
 
print FH "Rajiv";
 
close(FH);
 
open(FH,"$file") or die $!;
 
my @array=<FH>; 
 
close(FH);
 
print "Content-type:text/html\n\n";
 
print "Value=@array";
 
exit;

I am using Windows 2003 IIS 6.0 and Perl 5.8.8

my error


Permission denied at C:\Inetpub\vhosts\imi.in\cgi-bin\elearning\query\file_test.pl line 9.

Please help on this

Regards
Rajiv

[numberwhun]

Being you are on a Windows system, I don't know that you can use the Unix chmod() function in a Windows environment as I don't know that the Windows system can comprehend the way it sets permissions.

Typically, when you edit a file in Windows, you don't have to worry about the permissions as such, unless the file is specifically Read Only, but unless the file came from a CD or you specifically set it to be so, you shouldn't have to worry about that.


Regards,

Jeff