> open OUT, ">$file" or die $!;
Don't use OUT here, OUT is predefined by EMbperl. Also it may work, it may
have sideeffects. Just rename the filehandle to anythingelse
> my @outputfile = <IN>;
> print STDERR @outputfile;
> $|=1;
> for(@outputfile){
> print OUT;
> }
>
Also it's a good idea to close your file after writing, otherwise things
will not get written correctly to disk...
Gerald
-------------------------------------------------------------
Gerald Richter ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting
Post: Tulpenstrasse 5 D-55276 Dienheim b. Mainz
E-Mail: [EMAIL PROTECTED] Voice: +49 6133 925131
WWW: http://www.ecos.de Fax: +49 6133 925152
-------------------------------------------------------------
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
