calculate next version to test rather than hard coding

diff --git a/t/strictures.t b/t/strictures.t
index cf09a9d..9cf35bd 100644 (file)
--- a/t/strictures.t
+++ b/t/strictures.t
@@ -54,7 +54,8 @@ my $v;
 eval { $v = strictures->VERSION; 1 } or diag $@;
 is $v, $strictures::VERSION, '->VERSION returns version correctly';
 
-eval q{ use strictures 3; };
+my $next = int $v + 1;
+eval qq{ use strictures $next; };
 
-like $@, qr/strictures version 3 required/,
-  "Can't use strictures 3 (this is version 2)";
+like $@, qr/strictures version $next required/,
+  "Can't use strictures $next (this is version $v)";