TenDRA: Show exit code return value from main()

This commit is contained in:
Pragmatic Software 2015-01-24 11:53:23 -08:00
parent 4b9e177aec
commit a53b5473ae
1 changed files with 2 additions and 0 deletions

View File

@ -20,6 +20,8 @@ sub postprocess {
$input_quoted =~ s/\\"/"'\\"'"/g;
my ($retval, $result) = $self->execute(60, "bash -c \"date -s \@$self->{date}; ulimit -t 1; /home/compiler/prog <<< echo $input_quoted > .output\"");
$self->{error} = $retval;
$result = "";
open(FILE, '.output');
while(<FILE>) {