use strict;
use warnings;
-use Test::More tests => 21 + ($^V ge v5.10.0 ? 1 : 0);
+use Test::More tests => 21 + ("$]" >= 5.010 ? 1 : 0);
use Sub::Nary;
[ sub { $x or (3, 4) }, { 1 => 0.5, 2 => 0.5 } ],
[ sub { $x && (3, 4) }, { 1 => 0.5, 2 => 0.5 } ],
[ sub { $x and (3, 4) }, { 1 => 0.5, 2 => 0.5 } ],
- (([ eval 'sub { $x // (3, 4) }', { 1 => 0.5, 2 => 0.5 } ]) x ($^V ge v5.10.0)),
+ (([ eval 'sub { $x // (3, 4) }', { 1 => 0.5, 2 => 0.5 } ]) x ("$]" >= 5.010)),
);
my $i = 1;