X-Git-Url: http://git.ieval.ro/?p=gruntmaster-daemon.git;a=blobdiff_plain;f=lib%2FGruntmaster%2FDaemon%2FJudge%2FAbsolute.pm;fp=lib%2FGruntmaster%2FDaemon%2FJudge%2FAbsolute.pm;h=2adea012f76875550b649d3a9e909c74061612bc;hp=010cf0b2d70e94e7c01ce2b949ba4c1b1ab57405;hb=9d3e429ae750dcc65c17c5b47788e345b3060acf;hpb=cfb728e8fd9f99459af9851fb9901f3e9b82957e diff --git a/lib/Gruntmaster/Daemon/Judge/Absolute.pm b/lib/Gruntmaster/Daemon/Judge/Absolute.pm index 010cf0b..2adea01 100644 --- a/lib/Gruntmaster/Daemon/Judge/Absolute.pm +++ b/lib/Gruntmaster/Daemon/Judge/Absolute.pm @@ -11,8 +11,8 @@ our $VERSION = '0.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;