visual: disable smartmatch warnings on perl 5.018+

1 files changed, 2 insertions, 0 deletions

diff --git a/bin/vdf b/bin/vdf
index 7f69e7d..a799716 100755
--- a/bin/vdf
+++ b/bin/vdf
@@ -6,6 +6,8 @@ use strict;
 use warnings;
 use 5.010;
 
+no if $] >= 5.018, warnings => "experimental::smartmatch";
+
 use autodie;
 
 use Derf::Visual 'GD_bar';