Hmm.. You seem to assume that forking is the only way to connect to more that one client at a time, actually you can do it without fork at all, which means the main part keeps a reference to each socket connected, and can easily send data to each of the sockets in the list.
Eg:
my $sockserv = new IO::Socket::INET( LocalAddr => '192.168.1.1', LocalPort => $port, Proto => 'tcp', Listen => 1, Reuse => 1, Timeout => 60); die "Can't create Server ($!)" unless $sockserv; $x = new IO::Select(); $x->add($sockserv); $clients = 0; $sockclient=(); while (1) { my @handles = $x->can_read(); # wait for data foreach $handle (@handles) { if ($handle == $sockserv) { $sockclient = $sockserv->accept() || warn "accept: $!" +; $clients++; if ($clients > 5) { print $sockclient "Sorry, we're full.\n"; $sockclient->close(); } else { $sockclients[$clients] = $sockclient; } $x->add($sockclients[$clients]); } $cl = is_member($handle, @sockclients); if ($cl > -1) { $n_read = sysread($sockclients[$cl], $buf, 1024); return 0 if (!n_read || !length $buf); parse_external_command($buf, $sockclients[$cl]); } } }
Thus you have all clients in @sockclients, and can send data to each one using:
foreach my $sock (@sockclients) { print $sock $data; }
If you need forks tho, you'll need to find some other way to get an array of the sockets.
So maybe you should show us your code.

C.

Disclaimer: Copied partly from working code, not tested as is!


In reply to Re: Socket: Server shall send same $line to several clients by castaway
in thread Socket: Server shall send same $line to several clients by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.