>> 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]