Dear Monks:

A VB programmer wants me to write a Perl script which signals his program that I have just completed inserting a record into a database. I think I could alert him through a socket but he wants to do it through Windows calls and has sent me this:

My interfaces to slot systems use the following API's for IPC:
 
    CallWindowProc
    CopyMemory
    GetDesktopWindow
    GetWindow
    GetWindowText
    SendMessage
    SetWindowLong
 
The process is:
 
SetWindowLong to trap windows messages in your message handler.
 
Send a message:
    GetDesktopWindow for the topmost window handle.
    Loop until found
        GetWindowText to see the window caption
        If destination window is found,
            CopyMemory to build a byte array (it's a VB convolution)
            SendMessage to the window
        end if
        GetWindow for next window in chain
   loop
 
To receive messages:
    CopyMemory in your message handler to access the text.  (This may 
+be a VB thing, also)
    CallWindowProc to resume message processing
 
SetWindowLong to unhook your program from windows messages.
 
I hope this is helpful.  If you haven't called API's from VB, it may s
+eem like unnecessary steps are performed.  That's because some C++ da
+tatypes are not present in VB.
[download]

I will withhold comment.

Anyone know of a Perl Module thta implements this of should I just tell him to get with the program and open a listen socket for me.

Thankx!
Gary