Steve wrote:
> 
> I am using Windows 98 and ActiveState Perl.  I have a log file that after a
> certain size is truncated and reused.  I have written a simple script to
> copy that file to another file using File::Copy.  Is there a way to make
> sure the second file is appended instead of overwritten, using File::Copy
> or do I need to use something else?

Yes there is a way to do this.

open TO, ">> $old_log_file" or die "Cannot open $old_log_file: $!";

copy( $current_log, \*TO ) or die "Cannot copy $current_log: $!";



John
-- 
use Perl;
program
fulfillment

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

Reply via email to