[samuel]

Hi there!

I'm writing my first perl code and would like to have my program's result to a file. I'm handling errors like this:
...
else {
die "file is not valid at line $Num! ";
}
How can I write this error to a (log)file before my program dies? Should I use this in each case when I have die{} ?
else {
open ($LOG_FILE_HANDLE, ">mylog.log" ) || die "main() : mylog.log" ;
print $LOG_FILE_HANDLE "Error: file is not valid at line $Num!";
close( $LOG_FILE_HANDLE) ;
Or is there a professional solution for this?

Another question is, that if my program is running, and for some reason it terminates / hangs (because of interruption, resetting computer due to power-cut, shut down..etc) how can I write to a logfile that a failure occured and the program was terminated?
I'm using logfile handling as above.

Thanks
samuel