If I were attempting to do something along these lines I'd have a look at Flavio Poletti's Log::Log4perl::Tiny. Adding a new "format" shouldn't be difficult - look for the section beginning with the comment "# %format_for idea from Log::Tiny by J. M. Adler".