Select Code to Download

# do this once (obviously, I hope)
use IO::File;
...

# put lots of these throughout your program
printf LOG "PROC $$: %d %s(%d)\n", time, __FILE__, __LINE__;