You really should check out Log::Log4perl. It serves as a powerful logger and who says you can't use it for debugging too?