The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Proclet - minimalistic Supervisor

SYNOPSIS

  use Proclet;

  my $proclet = Proclet->new;

  # add service
  $proclet->service(
      code => sub {
          my $job = $jobqueue->grab;
          work($job);
      },
      worker => 2,
  );

  $proclet->service(
      code => sub {
          my $loader = Plack::Loader->load(
              'Starlet',
              port => $port,
              host => $host || 0,
              max_workers => 4,
          );
          $loader->run($app);
      },
  );

  $proclet->service(
      code => sub {
          exec('/usr/bin/memcached','-p','11211');
      },
  );

  $proclet->run;

DESCRIPTION

Proclet is minimalistic Supervisor, fork and manage many services from one perl script.

METHOD

service

Add services to Proclet.

Attributes are as follows:

code: CodeRef

Code reference of service

worker: Int

Number of children to fork, default is "1"

run

run services

AUTHOR

Masahiro Nagano <kazeburo {at} gmail.com>

SEE ALSO

Proc::Launcher::Manager, related module Parallel::Prefork, Proclet used internally

LICENSE

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