perlquestion
jdtoronto
Esteemed monks,<p>
My monstrous Win32 app has, inevitably, been installed on a machine running VIsata (Business edition). To start and external editor to edit email documents I use the code:
<code>
@command = ( "gc_edemail.exe", $::cini_global->{newsletter}->{email_template_file} );
print "Now actually execute the command to edit \n";
if ( system( 1, @command) == 0 ) {
print "Command: @command executed and returned 0\n";
}
else {
if ( $? == -1 ) {
print "failed to execute: $!\n";
}
else {
printf "child ran with value %d\n", $? >> 8;
}
}
</code>
Which appears to execute normally (the editor opens and the main programme prints the "child ran with value..." portion.<p>
But Vista pops up a window which says "..Application Name.. has stopped working." WHen you clear that dialogue the main programme closes and the child (the editor) is left, fully functioning.<p>
Any clues?<p>[jdtoronto]