use 5.014000;
use strict;
use warnings;
+use re '/s';
use Gruntmaster::Daemon::Constants qw/WA/;
use File::Slurp qw/slurp/;
use Log::Log4perl qw/get_logger/;
-our $VERSION = "5999.000_002";
+our $VERSION = '5999.000_004';
##################################################
$out =~ s/\s+$//;
$ok =~ s/\s+$//;
- die [WA, "Wrong answer"] if $out ne $ok;
+ die [WA, 'Wrong answer'] if $out ne $ok; ## no critic (RequireCarping)
$meta->{tests}[$test - 1] // 0
}