Re^3: How to log all output from a program?


go ahead... be a heretic
	PerlMonks

Re^3: How to log all output from a program?

by shmem (Chancellor)

on Oct 15, 2007 at 08:50 UTC ( [id://644864]=note: print w/replies, xml )

Need Help??

in reply to Re^2: How to log all output from a program?
in thread How to log all output from a program?

Ah, of course. But you also can do that from the outside :-)

BTW, if you open/close the filehandle inside the loop (and perhaps include $$ in the output) it is less probable that multiple processes mess up the logfiles.

--shmem

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}

Comment on Re^3: How to log all output from a program?

Replies are listed 'Best First'.

Re^4: How to log all output from a program?
by salva (Canon) on Oct 15, 2007 at 09:10 UTC

BTW, if you open/close the filehandle inside the loop (and perhaps include $$ in the output) it is less probable that multiple processes mess up the logfiles

I don't think so. Usually, the OS provides atomic write operations up to a certain length. If your write operations go over that limit, the way to ensure that data from different processes does not interleave is to lock the file.

Reopening the file on every write allows to rotate the logs from the outside without the current script knowing.

[reply]

In Section Seekers of Perl Wisdom