Well, I think that, at a high level, what you want to do is to treat the running sub-process as a source of events for your main loop.

Essentially, when you fork off the child, open a pipe to read from it (bi-directional would be harder, but still possible). Here's the basic idea: 

$pid = open(KID_TO_READ, "-|");
die "Unable to fork: $!\n" unless defined $pid;

if (!$pid) {   # child
   exec($program, @options, @args) or die "Can't exec $program: $!\n";
}

[download]
Then, in your main-loop, do a non-blocking read from KID_TO_READ. (There are plenty of good examples around here of how to use IO::Select for non-blocking reads.) Anyway, you take that non-blocking read as an additional source of incoming events into your main loop. That way, you can be kept constantly abrest of the status of the executing job.

Also, since you've got the pid of the executing job, you can tie a button in your GUI to send a signal (like INT to stop, etc) to your job.


------------
:Wq
Not an editor command: Wq

In reply to Re: Give me my gui back! by etcshadow
in thread Give me my gui back! by Bagarre

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.