X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FThread-Cleanup.git;a=blobdiff_plain;f=t%2F20-recurse.t;fp=t%2F20-recurse.t;h=b8612371f617778f93aa920463a7a0392f025122;hp=24e6184a3a93e0cb8b0660aba641b05d77ddd549;hb=80bbdd645dcd29e89423be24aa15d85a28be59f2;hpb=d6ce81a815b5ee3cd5fd025cd6513c56c0173a0e diff --git a/t/20-recurse.t b/t/20-recurse.t index 24e6184..b861237 100644 --- a/t/20-recurse.t +++ b/t/20-recurse.t @@ -31,7 +31,7 @@ BEGIN { use Thread::Cleanup; -diag 'This will leak some scalars' unless $] >= 5.011005; +diag 'This will leak some scalars' unless "$]" >= 5.011005; our $x = -1;