stringify version before comparing, as recommended by Zefram
[p5sagit/Try-Tiny.git] / t / when.t
index 4662d25..fd0ccde 100644 (file)
--- a/t/when.t
+++ b/t/when.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 use warnings;
 
@@ -13,7 +11,7 @@ BEGIN {
 use Try::Tiny;
 
 use 5.010;
-no if $] >= 5.017011, warnings => 'experimental::smartmatch';
+no if "$]" >= 5.017011, warnings => 'experimental::smartmatch';
 
 my ( $foo, $bar, $other );