Select Code to Download

setsockopt(fd,IPPROTO_IP,IP_ADD_MEMBERSHIP,(void*) &mreq,sizeof(mreq))
+ < 0)

package T;
use strict;
...
print "below mysub2\n";

$t2->join();