On Mon, 18 Feb 2002 16:18:27 +0200, [EMAIL PROTECTED] (Bruce Ambraal) wrote:

>Hi 
>
>Could someone help?
>
>the following code is not working.
>
>open(INPUT_FILE,"+>fixed.dat") || die "Could not open filename";
>while (<STDIN>) {
>print INPUT_FILE "bruce\n";
>}
>close(INPUT_FILE);

Try unquoting bruce:

open(INPUT_FILE,"+>fixed.dat") || die "Could not open filename";
while (<STDIN>) {
print INPUT_FILE  bruce,"\n";
}
close(INPUT_FILE);

you can get your STDIN instead of "bruce" with

open(INPUT_FILE,"+>fixed.dat") || die "Could not open filename";
while (<STDIN>) {
print INPUT_FILE  $_,"\n";
}
close(INPUT_FILE);


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to