Help for this page

Select Code to Download

Select or download this

sub unlock{
  my $self=shift;
...
    unlink $SEM;
  }
}

Select or download this

Use of uninitialized value in ref-to-glob cast at /opt/perl5/lib/site_
+perl/5.6.0
/Logger/Simple.pm line 85.
Use of uninitialized value in ref-to-glob cast at /opt/perl5/lib/site_
+perl/5.6.0
/Logger/Simple.pm line 98.