All.

Many thanks for your replies. I am grateful for all responses.

Here is my conclusion...

1. Log4Perl: Brilliant package. Does everything I could ever have imagined would be required in a log. I just wish I had known about it when I embarked on this project. I would use this if I was to start again.

2. Perdata __LINE__: Getting there. A quick solution, seems to be just what I was hoping for.

3. caller: This is icing on the cake.

4. Make use of warn, $SIG{__WARN__} and END {...}: And I can now ensure I get the log out regardless of the death of my script.

I am truly spoilt for choice, and for this project will definately be using caller and will Make use of warn, $SIG{__WARN__} and END {...}:.

I shall definitley find use for verything sometime in future.

Many thanks again.

Lucas Bearslumber