split BEGIN block to force hide imports from perl

Netdisco/bin/nd-import-topology

@@ -22,7 +22,9 @@ BEGIN {
       die "Sorry, can't find libs required for App::Netdisco.\n"
         if !exists $ENV{PERLBREW_PERL};
   }
+}
 
+BEGIN {
   use Path::Class;
 
   # stuff useful locations into @INC and $PATH

Netdisco/bin/netdisco-daemon

@@ -22,7 +22,9 @@ BEGIN {
       die "Sorry, can't find libs required for App::Netdisco.\n"
         if !exists $ENV{PERLBREW_PERL};
   }
+}
 
+BEGIN {
   use Path::Class;
 
   # stuff useful locations into @INC and $PATH

Netdisco/bin/netdisco-db-deploy

@@ -22,7 +22,9 @@ BEGIN {
       die "Sorry, can't find libs required for App::Netdisco.\n"
         if !exists $ENV{PERLBREW_PERL};
   }
+}
 
+BEGIN {
   use Path::Class;
 
   # stuff useful locations into @INC and $PATH

Netdisco/bin/netdisco-deploy

@@ -22,7 +22,9 @@ BEGIN {
       die "Sorry, can't find libs required for App::Netdisco.\n"
         if !exists $ENV{PERLBREW_PERL};
   }
+}
 
+BEGIN {
   use Path::Class;
 
   # stuff useful locations into @INC and $PATH

Netdisco/bin/netdisco-do

@@ -22,7 +22,9 @@ BEGIN {
       die "Sorry, can't find libs required for App::Netdisco.\n"
         if !exists $ENV{PERLBREW_PERL};
   }
+}
 
+BEGIN {
   use Path::Class;
 
   # stuff useful locations into @INC and $PATH

Netdisco/bin/netdisco-rancid-export

@@ -22,7 +22,9 @@ BEGIN {
       die "Sorry, can't find libs required for App::Netdisco.\n"
         if !exists $ENV{PERLBREW_PERL};
   }
+}
 
+BEGIN {
   use Path::Class;
 
   # stuff useful locations into @INC and $PATH

Netdisco/bin/netdisco-web

@@ -22,7 +22,9 @@ BEGIN {
       die "Sorry, can't find libs required for App::Netdisco.\n"
         if !exists $ENV{PERLBREW_PERL};
   }
+}
 
+BEGIN {
   use Path::Class;
 
   # stuff useful locations into @INC and $PATH