I have a Perl Tk and a graphical none Perl application working together. The none Perl application is started from the Perl application with the code: 
$ppc = Win32::Process::Create(
        $global_process,
        $command_a,
        $command_b,
        0,
        NORMAL_PRIORITY_CLASS,
        '.'
    );

[download]
The none Perl application creates a file that the Perl application is ‘waiting’ for. When the file is found, the Perl application brings up a Tk window that is completed by the user. The none Perl application is then used agaian. The problem is that the keboard in the none Perl application only become 'active' after the left mouse key has been pressed. It is though the 'focus' (or something like this) is not being released after the Tk window has been completed. I have added the following lines just before the none Perl application is used again. 
$mw_Main->grabRelease; 
$mw_Main->withdraw; 
$global_process->Resume();

[download]
This did make things any better (or worse). Has anyone any ideas ho I can prevent the need to use the left mouse button before the keys become active?

20050516 Edit by castaway: Changed title from 'Ineraction of Perl and applications not written in Perl'

In reply to Interaction of Perl and applications not written in Perl by merrymonk

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.