Provided by: liblog-log4perl-perl_1.49-1_all bug


       Log::Log4perl::Util::Semaphore - Easy to use semaphores


           use Log::Log4perl::Util::Semaphore;
           my $sem = Log::Log4perl::Util::Semaphore->new( key => "abc" );

             # ... critical section

           $sem->semset( uid  => (getpwnam("hugo"))[2],
                         gid  => 102,
                         mode => 0644


       Log::Log4perl::Util::Semaphore provides the synchronisation mechanism for the appender in Log4perl, but can be used independently of Log4perl.

       As a convenience, the "uid" field accepts user names as well, which it translates into the
       corresponding uid by running "getpwnam".


       Copyright 2002-2013 by Mike Schilli <> and Kevin Goess <>.

       This library is free software; you can redistribute it and/or modify it under the same
       terms as Perl itself.


       Please contribute patches to the project on Github:


       Send bug reports or requests for enhancements to the authors via our

       MAILING LIST (questions, bug reports, suggestions/patches):

       Authors (please contact them via the list above, not directly): Mike Schilli
       <>, Kevin Goess <>

       Contributors (in alphabetical order): Ateeq Altaf, Cory Bennett, Jens Berthold, Jeremy
       Bopp, Hutton Davidson, Chris R. Donnelly, Matisse Enzer, Hugh Esco, Anthony Foiani, James
       FitzGibbon, Carl Franks, Dennis Gregorovic, Andy Grundman, Paul Harrington, Alexander
       Hartmaier  David Hull, Robert Jacobson, Jason Kohles, Jeff Macdonald, Markus Peter, Brett
       Rann, Peter Rabbitson, Erik Selberg, Aaron Straup Cope, Lars Thegler, David Viner, Mac