🚀 go-pugleaf

In article <4a54h9$a0g@shellx.best.com> Zenin <zenin@best.com> writes:

   I can't seem to figure out how to write to a file.
   I thought it was somthing like
	   write(FOO, "filename");

   but I guess it's no so easy. :(

Oh, it is that easy.  But you don't want write()---you want print().
write() is for strange beasts called formats.

   So what is the syntax to do somthing like:
	   #!/usr/bin/perl
	   open(FOO, "original_filename");
	   while(<FOO>) {
		   do some stuff;
	   }
	   write(FOO, "new_filename");
	   close FOO;


#!/usr/bin/perl

open (FOO, "original_filename");
while (<FOO>) {
	do some(stuff);
}

open (FOO, ">new_filename");     # open new_filename for writing,
                                 # implicitly closing the old FOO
print FOO "some new text\n";     

close FOO;                       # not necessary, but good style.



To open FOO for both reading and writing, you can use
open (FOO, "<+filename");



Jon Orwant
MIT Media Lab