Fix unnecessary begin blocks in Perl source files.

1 files changed, 1 insertions, 9 deletions

diff --git a/vendor/update b/vendor/update
index 20a4284bc..ca113ff29 100755
--- a/vendor/update
+++ b/vendor/update
@@ -18,15 +18,7 @@
 #
 
 
-BEGIN {
-	require 5.10.0;
-	unless (-f 'configure') {
-		print "Error: $0 must be run from the main source directory!\n";
-		exit 1;
-	}
-}
-
-use feature ':5.10';
+use v5.10.0;
 use strict;
 use warnings FATAL => qw(all);