--- a/lib/DNS/Vi.pm	Tue Jan 27 21:55:42 2015 +0100
+++ b/lib/DNS/Vi.pm	Tue Jan 27 22:04:32 2015 +0100
@@ -1,5 +1,5 @@
 package DNS::Vi;
-use 5.010;
+use 5.0101;
 use strict;
 use warnings;
 use if $ENV{DEBUG} // '' eq 'dnsvi' => 'Smart::Comments';
@@ -7,7 +7,8 @@
 use File::Temp;
 use Term::ReadKey;
 use base 'Exporter';
-use experimental 'smartmatch';
+use if $] >= 5.020, experimental => 'smartmatch';
+
 
 #no if $warnings::Offset{'experimental'} => (warnings => 'experimental');