Hi,
we will do this using seek() function.
 seek($FILEHANDLE,2,SEEK_END).
This will set the file handler to eof position.So we can able to start writing from the end.
more info:
http://perldoc.perl.org/functions/seek.html Regards kulasekar.