File Coverage

blib/lib/Child/IPC/Socket.pm
Criterion Covered Total %
statement 22 22 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod 1 3 33.3
total 32 34 94.1


line stmt bran cond sub pod time code
1             package Child::IPC::Socket;
2 9     9   45 use strict;
  9         18  
  9         231  
3 9     9   42 use warnings;
  9         9  
  9         165  
4 9     9   7287 use Child::Util;
  9         4605  
  9         477  
5              
6 9     9   5403 use Child::Link::IPC::Socket::Proc;
  9         27  
  9         267  
7 9     9   6033 use Child::Link::IPC::Socket::Parent;
  9         24  
  9         234  
8              
9 9     9   45 use base 'Child';
  9         18  
  9         6933  
10              
11             add_accessors qw/name shared_data started/;
12              
13 18     18 0 30385 sub child_class { 'Child::Link::IPC::Socket::Proc' }
14 6     6 0 18549 sub parent_class { 'Child::Link::IPC::Socket::Parent' }
15              
16             sub new {
17 22     22 1 23855322 my ( $class, $code, $file ) = @_;
18 22         1379 return bless(
19             {
20             _code => $code,
21             _shared_data => $file,
22             },
23             $class
24             );
25             }
26              
27             1;
28              
29             =head1 NAME
30              
31             Child::IPC::Socket - Socket based IPC plugin for L
32              
33             =head1 DESCRIPTION
34              
35             Procs have a listen UNIX socket, parent connects to it. You can reconnect to a
36             proc later, or from another process.
37              
38             See L.
39              
40             =head1 AUTHORS
41              
42             Chad Granum L
43              
44             =head1 COPYRIGHT
45              
46             Copyright (C) 2010 Chad Granum
47              
48             Child is free software; Standard perl licence.
49              
50             Child is distributed in the hope that it will be useful, but WITHOUT
51             ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
52             FOR A PARTICULAR PURPOSE. See the license for more details.