@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; } }