Hello Everybody,

One of the files is not opening.....Couldnt get WHY...................possibly U 
CAN......HELP....
  
NOTE :
the same program i am running independently on telnet with command line arguments , is 
running perfectly........but thru browser its not working..the problem its giving is 
as follows  ..................
 
the code goes like this :

# !usr/bin/perl -w
use CGI;
$query =new CGI ;
print <<"Endoftext";
Content-type: text/html
<html>........</html>
Endoftext         #########             fine till here
 
$mailids = $query->param('mailid') ; 
for($mailids)
{
s/^\s//;
s/\s+$//;
}
print "$mailid Hello" ;           #########             fine till here
 $file =/var/www/cgi-bin/cgirahul/cli.txt ;
$old = $file ;
$new =$file.tmp.$$" ;
$bak="$file.bak";
print"SHEEEEEEEEEEEE";      #########             fine till here
open(OLD,"< $old") or die "cant open $old: $!";
print "HEEEEEEEEE" ;     #########             fine till here
open(NEW,"> $new") or die "cant open $new: $!";        #######not opening ,actually 
its not created....it needs to be created at runtime but not happening when run     
############ thru  browser.its doing perfectly well 
print "OOOOOOOOOOOPPPPPPs" ;                        ########################         
not printing man.......above file is not opening i hope ..................
############rest of prog.........goes here..............

Waiting for Reply.........
Thanx in Advance,
Rahul








Reply via email to