view release on metacpan or  search on metacpan

README  view on Meta::CPAN

                               $sock->error());
                  $sock->close();
                  return;
              }
          }
      }

      package main;

      my $server = Calculator->new({'pidfile' => 'none',
                                    'localport' => 2000}, \@ARGV);
      $server->Bind();

KNOWN PROBLEMS
    Most, or even any, known problems are related to the Sys::Syslog module
    which is by default used for logging events under Unix. I'll quote some
    examples:

    Usage: Sys::Syslog::_PATH_LOG at ...
        This problem is treated in perl bug 20000712.003. A workaround is
        changing line 277 of Syslog.pm to

lib/Net/Daemon.pm  view on Meta::CPAN

sub new ($$;$) {
    my ( $class, $attr, $args ) = @_;
    my ($self) = $attr ? \%$attr : {};
    bless( $self, ( ref($class) || $class ) );

    my $options = ( $self->{'options'} ||= {} );
    $self->{'args'} ||= [];
    if ($args) {
        my @optList = map { $_->{'template'} } values( %{ $class->Options() } );

        local @ARGV = @$args;
        if ( !Getopt::Long::GetOptions( $options, @optList ) ) {
            $self->Usage();
        }
        @{ $self->{'args'} } = @ARGV;

        if ( $options->{'help'} ) {
            $self->Usage();
        }
        if ( $options->{'version'} ) {
            print STDERR $self->Version(), "\n";

lib/Net/Daemon.pm  view on Meta::CPAN

			   $sock->error());
	      $sock->close();
	      return;
	  }
      }
  }

  package main;

  my $server = Calculator->new({'pidfile' => 'none',
				'localport' => 2000}, \@ARGV);
  $server->Bind();


=head1 KNOWN PROBLEMS

Most, or even any, known problems are related to the Sys::Syslog module
which is by default used for logging events under Unix. I'll quote some
examples:

=over