fix t/win32/signal.t

[perl5.git] / t / win32 / signal.t

diff --git a/t/win32/signal.t b/t/win32/signal.t
index 143327a..8aecfec 100644 (file)
--- a/t/win32/signal.t
+++ b/t/win32/signal.t
@@ -15,6 +15,9 @@ BEGIN {
     }
 }
 
+use strict;
+use Config;
+
 skip_all("requires compilation with the fork emulation")
   unless $Config{'d_pseudofork'};
 
@@ -23,8 +26,6 @@ skip_all("requires compilation with the fork emulation")
 # manual test counting because the forks confuse test.pl
 print "1..4\n";
 
-use Config;
-
 # find a safe signal, the implementation shouldn't be doing anything
 # funky with NUMdd signals
 my ($sig) = grep /^NUM/, split ' ', $Config{sig_name};