>> print (@contents);

You have to print to the file handle, otherwise, nothing will
write to WRITEFILE, but to screen only.
So, you have to write as :

print WRITEFILE @contents;

>> @newcontents = <NEWWRITEFILE>;
>> print "\n The contents of writefile.txt is $newcontents \n";

No, $newcontents here will prints nothing... this should be :
foreach $line(@newcontents) { print $line."\n" };
or
print $_ for (@newcontents);







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

Reply via email to