Creating a file 1

[fergmj]

I want to create a file on my webserver and set the chmod to 666. However, I seem to have to create the file manually. I know how to rmdir to remove directories and such but how do I make actual *.txt files from Perl code and set the permissions?

Thanks

 

[raider2001]

$file = "file.txt";
open(F, ">$file&quot or die "Can't open $file: $!\n";
print F "hello world\n";
close(F);
chmod 0666, $file;

 

[fergmj]

raider2001

Actually the above does not create the txt file on my server. It has to already exist before it doesn't error.

$filedatename = "$currentdate$counter\.txt";
$tstone = "GB$filedatename";
open (TS, ">>$tstone&quot || dienice("Can't open Thunderstone TextFile"
flock(TS,2);
seek(TS,0,2);
$fs = chr(28);
$a100 = "1:00 4";
print TS "$fs$a100";
close(TS);
chmod 0666, $tstone;


Any other thoughts?

fergmj

 

[raider2001]

I just ran my code on a Linux system and it works for me. Your code also works fine. Are you sure this isn't a permissions problem on the directory?

 

[fergmj]

What should I chmod the folder to?

What is your set for??

 

[fergmj]

WORKS WHEN I SET IT TO 777


THANK YOU!!!!!!!