Update VPIT::TestHandlers

[perl/modules/Scope-Upper.git] / t / lib / Scope / Upper / TestGenerator.pm

diff --git a/t/lib/Scope/Upper/TestGenerator.pm b/t/lib/Scope/Upper/TestGenerator.pm
index 18ced2475f672c0380e48c08b9fe11c3228f3434..9ef65b8849474977047cd193d473d7755520c9ac 100644 (file)
--- a/t/lib/Scope/Upper/TestGenerator.pm
+++ b/t/lib/Scope/Upper/TestGenerator.pm
@@ -26,7 +26,7 @@ my @blocks = (
 );
 
 sub import {
- if ($] >= 5.010001) {
+ if ("$]" >= 5.010_001) {
   push @blocks, [ 'given (1) {', '}' ];
   require feature;
   feature->import('switch');