No, before you can help yourself. Try Linux or FreeBSD or OpenBSD instead of Redmond crap.
Now serious.
try:
#!/usr/bin/perl
open(OUTPUT,">>/tmp/file");
$a = "some text...";
print OUTPUT $a;
Now, change the /tmp/file and stuff to anything you want to.
HTH
vfs ("The Perl Monkey") :) | [reply] [Watch: Dir/Any] |
I forgot this:
it 's better to assign a variable to a filename, as:
$b = "/tmp/file";
Then change the filename in open to the name of that variable.
Cheers.
vfs.
| [reply] [Watch: Dir/Any] |
Im having the same problem w/ writing to a file, using Win2k/ActivePerl
Thinking that win2k is not handling the opening of files correctly. Please, without saying, dont use win2k, can someone post a work around?
I updated w/ the suggestion you posted as such:
#!perl -w
open(FILE, "data.txt"); #opens data.txt in read-mode
while(<FILE>){ #reads line by line from FILE which i
+s the filehandle for data.txt
chomp;
print "Saw $_ in data.txt\n"; #shows you what we have read
}
close FILE; #close the file.
$a = "keylogger.dat";
open FILE, ">$a" or die; #opens file to be written to
while(<>){ #while we're getting input from the keyb
+oard
print FILE $_; #write it to our file
}
close FILE; #then close our file.
"Re: File Input and Output
by gpoduval on Jan 30, 2001 at 06:42
hmm...when i tried the >>filename nothing got appended into the file. it remained as it is
i am using activestate activeperl for windows on win2k.
i suspect this might be because i dont know how to end a program. anybody can help me ? www.comp.nus.edu.sg/~gokulpod"
| [reply] [Watch: Dir/Any] [d/l] |
Just in case:
Make sure you're not cutting and pasting that text so that you have a line in your code that says:
+s the filehandle for data.txt
That (along with +oard) will likely cause errors, though I don't know what those errors would look like in ActivePerl for Win2k.
CopyWrite Chad Perrin
| [reply] [Watch: Dir/Any] [d/l] [select] |
I could be wrong but I guess that after typing your code you are using Ctrl+c to end the script. This kills the script rather than ends the while loop. Try using Ctrl+z instead.
Cheers
| [reply] [Watch: Dir/Any] [d/l] [select] |
#!perl -w
open(FILE, "data.txt"); #opens data.txt in read-mode
while(<FILE>){ #reads line by line from FILE which i
+s the filehandle for data.txt
chomp;
print "Saw $_ in data.txt\n"; #shows you what we have read
}
close FILE; #close the file.
$a = "keylogger.dat";
open FILE, ">$a" or die; #opens file to be written to
while(<>){ #while we're getting input from the keyb
+oard
print FILE $_; #write it to our file
}
close FILE; #then close our file.
| [reply] [Watch: Dir/Any] |
I believe you need work in a directory like that, c:\test. It happened to me same you, because I´ve worked in a directory like this x:\test. Luiyi, luiyi2manu@gmail.com | [reply] [Watch: Dir/Any] |