- $msg = $3;
- if ($msg =~ /^Compile /) { $cmt = "CE"; }
- elsif ($msg =~ /^Time limit exceeded/) { $cmt = "TO"; }
- elsif ($msg =~ /^Exited with error /) { $cmt = "RE"; }
- elsif ($msg =~ /^Caught fatal signal /) { $cmt = "SG"; }
+ if ($trem =~ /^Compile /) { $cmt = "CE"; }
+ elsif ($trem =~ /^Time limit exceeded/) { $cmt = "TO"; }
+ elsif ($trem =~ /^Exited with error /) { $cmt = "RE"; }
+ elsif ($trem =~ /^Caught fatal signal /) { $cmt = "SG"; }
+ elsif ($trem =~ /^([A-Za-z])\S*\s+([A-Za-z])/) {
+ ($cmt = "$1$2") =~ tr/a-z/A-Z/;
+ }
+ elsif ($trem =~ /^Wrong answer/) { $cmt = "WA"; }