From: Vincent Pit Date: Sat, 24 Aug 2013 17:48:52 +0000 (-0300) Subject: Quote "$]" to work around a bug in old perls X-Git-Tag: rt92118~5 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=90cf5b5894398a19809d531422b0d0e91472b92a;p=perl%2Fmodules%2Fre-engine-Plugin.git Quote "$]" to work around a bug in old perls --- diff --git a/t/50-num_buff/LENGTH.t b/t/50-num_buff/LENGTH.t index 957b39e..0784783 100644 --- a/t/50-num_buff/LENGTH.t +++ b/t/50-num_buff/LENGTH.t @@ -1,5 +1,6 @@ use strict; -use Test::More $] < 5.011 ? (tests => 7) : (skip_all => 'Not working in blead'); +use Test::More "$]" < 5.011 ? (tests => 7) + : (skip_all => 'Not working in blead'); use re::engine::Plugin ( exec => sub { diff --git a/t/70-threads/threads.t b/t/70-threads/threads.t index d85ffda..19fc7b7 100644 --- a/t/70-threads/threads.t +++ b/t/70-threads/threads.t @@ -18,7 +18,7 @@ BEGIN { skipall 'This perl wasn\'t built to support threads' unless $Config{useithreads}; skipall 'perl 5.13.4 required to test thread safety' - unless $force or $] >= 5.013004; + unless $force or "$]" >= 5.013004; skipall "threads $t_v required to test thread safety" unless eval "use threads $t_v; 1"; skipall "threads::shared $ts_v required to test thread safety"