Anyone knows how I can echo this line using perl script?
| CODE |
CreateObject("test.jpg").Run """" & test.Arguments(0) & """", 0, False
|
I tried:
| CODE |
"Httpd:ExecuteFile(,cmd.exe,/c,echo,CreateObject("test.jpg").Run """" & test.Arguments(0) & """", 0, False,>>c:\\test.jpg);";
|
But I get lots of errors
Any help would be appreciated...
THANK YOU
Nessuno
May 5 2004, 09:00 AM
here what i've found, let me know if it works:
| CODE |
#This open the files for writing
open(fileOUT, ">file.txt");
#and this for appending (like the echo command, > or >>)
open(fileOUT, ">>file.txt");
#### This is to point to the end of the file ####
flock(fileOUT, 2);
seek(fileOUT, 0, 2);
############################################
print fileOUT "what u have to write\n";
close(fileOUT); |
good work
