Chat server: Difference between revisions

my ($id, $message) = @_;

print "$message\n";

if ($i != $id) {

$open[$i]->send("$message\n");

}

 

 

my $conn = $open[$i];

else {

broadcast($i, "--- $users{$i} leaves ---");

}

}