A high performance Perl logging module