multicasting on win32

2002-10-08 Thread James McDermet

Has anyone written a multicast app on Win32?  I am attempting to create 
a chat-like app to run on WinNT and Win2K.  Microsoft states that WinNT 
can receive multicast packets as a client, 
http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q179982; and 
multicasting is supportted on Win2K.

I have downloaded IO-Interface-0.97 and IO-Socket-Multicast-0.21 modules 
but when attempting to build them, nmake aborts complaining that ioctl.h 
is missing.  Where can I get that file?

Can anyone offer advice?

James

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



fork and child processes

2001-06-18 Thread James McDermet

I have a script that I want to fork a child process that will start an
application, e.g. notepad.  Once notepad is closed I want the child
process to send a signal to the parent.  How would I do this in Windows?

my $pid = fork();
defined ($pid) or die Can't fork: $!;

if ($pid  0){exit};

print my PID is $$\n;
`notepad`;

while (1) {
socket_listening();
}


James



___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users



sockets problem

2001-05-31 Thread James McDermet

In the script below when I send a START msg to the socket it is
successfully received.  When I send a STOP msg it is not.  What am I
doing wrong here?

James


use strict;
use IO::Socket;

my $client;
my $server_port = 5010;

my $server = IO::Socket::INET-new(LocalPort = $server_port,
   Type  = SOCK_STREAM,
   Reuse = 1,
   Listen= 5 )
or die Couldn't be a tcp server on port $server_port : $@\n$!\n;

while ( $client = $server-accept() ) {
if ( $client =~ /START/ ){
msgBox(Starting client...);
logEvent(Starting client...);
} elsif ( $client =~ /STOP/ ) {
msgBox(Stopping client...);
logEvent(Stopping client...);
}
}

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users