X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FDaemon%2FJudge%2FAbsolute.pm;h=c90fcf8bd767acff7c53bf9b9381597b4c4eddc2;hb=a552265610c628aa30a1195497aa08d3c79f0a37;hp=010cf0b2d70e94e7c01ce2b949ba4c1b1ab57405;hpb=5c5cd38ad5b9e3c2b331564bc0b23e9167b7d07a;p=gruntmaster-daemon.git diff --git a/lib/Gruntmaster/Daemon/Judge/Absolute.pm b/lib/Gruntmaster/Daemon/Judge/Absolute.pm index 010cf0b..c90fcf8 100644 --- a/lib/Gruntmaster/Daemon/Judge/Absolute.pm +++ b/lib/Gruntmaster/Daemon/Judge/Absolute.pm @@ -6,13 +6,13 @@ use warnings; use Gruntmaster::Daemon::Constants qw/AC/; -our $VERSION = '0.001'; +our $VERSION = '5999.000_001'; ################################################## sub judge{ - $_ = pop; - ref $_ ? (result => $_->[0], result_text => $_->[1]) : (result => AC, result_text => 'Accepted') + my $result = pop; + ref $result ? (result => $result->[0], result_text => $result->[1]) : (result => AC, result_text => 'Accepted') } 1;