I call an ARSPerl function e.g. login, which only returns a structure, but opens its own stream to STDOUT. I have redirected STDOUT to a log file which i also write to using print statements in the format e.g.

Sun May 29 11:15:46 2005        Successfully generated query.
[download]

but my redirect of STDOUT does not allow formatting. e.g. my line of perl code:

($control = ars_Login($arsserver, $arsuser, $arspass))
[download]

produces this text, sent directly to STDOUT

[ARS.xs 201] XS_ARS_ars_Login : ars_Login(arsprod, hp_servicecall, [nu
+ll])
[ARS.xs 292] XS_ARS_ars_Login : finished.
[download]

I want to enforce formatting rules so any print statement, even ones from the library call, have to obey i.e. including datetime.

Janitored by holli - fixed formatting