summaryrefslogtreecommitdiff
path: root/lib/IPC
diff options
context:
space:
mode:
Diffstat (limited to 'lib/IPC')
-rw-r--r--lib/IPC/Run/t/adopt.t4
-rw-r--r--lib/IPC/Run/t/binmode.t4
-rw-r--r--lib/IPC/Run/t/bogus.t4
-rw-r--r--lib/IPC/Run/t/filter.t4
-rw-r--r--lib/IPC/Run/t/harness.t4
-rw-r--r--lib/IPC/Run/t/io.t4
-rw-r--r--lib/IPC/Run/t/kill_kill.t4
-rw-r--r--lib/IPC/Run/t/parallel.t4
-rw-r--r--lib/IPC/Run/t/pty.t4
-rw-r--r--lib/IPC/Run/t/pump.t4
-rw-r--r--lib/IPC/Run/t/run.t4
-rw-r--r--lib/IPC/Run/t/signal.t4
-rw-r--r--lib/IPC/Run/t/timeout.t4
-rw-r--r--lib/IPC/Run/t/timer.t4
-rw-r--r--lib/IPC/Run/t/win32_compile.t4
15 files changed, 30 insertions, 30 deletions
diff --git a/lib/IPC/Run/t/adopt.t b/lib/IPC/Run/t/adopt.t
index 9fd1303ed0..7458758581 100644
--- a/lib/IPC/Run/t/adopt.t
+++ b/lib/IPC/Run/t/adopt.t
@@ -8,11 +8,11 @@ adopt.t - Test suite for IPC::Run::adopt
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/binmode.t b/lib/IPC/Run/t/binmode.t
index 1038a7d19e..cbfca0fb4d 100644
--- a/lib/IPC/Run/t/binmode.t
+++ b/lib/IPC/Run/t/binmode.t
@@ -8,11 +8,11 @@ binary.t - Test suite for IPC::Run binary functionality
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/bogus.t b/lib/IPC/Run/t/bogus.t
index 7718331c5f..176315b35a 100644
--- a/lib/IPC/Run/t/bogus.t
+++ b/lib/IPC/Run/t/bogus.t
@@ -8,11 +8,11 @@ bogus.t - test bogus file cases.
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/filter.t b/lib/IPC/Run/t/filter.t
index 6242ef083d..90126df611 100644
--- a/lib/IPC/Run/t/filter.t
+++ b/lib/IPC/Run/t/filter.t
@@ -8,11 +8,11 @@ filter.t - Test suite for IPC::Run filter scaffolding
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/harness.t b/lib/IPC/Run/t/harness.t
index 782338373a..e42ee18ba6 100644
--- a/lib/IPC/Run/t/harness.t
+++ b/lib/IPC/Run/t/harness.t
@@ -8,11 +8,11 @@ harness.t - Test suite for IPC::Run::harness
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/io.t b/lib/IPC/Run/t/io.t
index 8e656fb129..56a5c6fbd9 100644
--- a/lib/IPC/Run/t/io.t
+++ b/lib/IPC/Run/t/io.t
@@ -8,11 +8,11 @@ io.t - Test suite excercising IPC::Run::IO with IPC::Run::run.
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/kill_kill.t b/lib/IPC/Run/t/kill_kill.t
index cebdbe0ab5..cec0f6a675 100644
--- a/lib/IPC/Run/t/kill_kill.t
+++ b/lib/IPC/Run/t/kill_kill.t
@@ -8,11 +8,11 @@ kill_kill.t - Test suite IPC::Run->kill_kill
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/parallel.t b/lib/IPC/Run/t/parallel.t
index fac47b1fac..d178247a84 100644
--- a/lib/IPC/Run/t/parallel.t
+++ b/lib/IPC/Run/t/parallel.t
@@ -8,11 +8,11 @@ parallel.t - Test suite for running multiple processes in parallel.
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/pty.t b/lib/IPC/Run/t/pty.t
index 070767b0f0..83ad5beca6 100644
--- a/lib/IPC/Run/t/pty.t
+++ b/lib/IPC/Run/t/pty.t
@@ -25,11 +25,11 @@ further, but I have not the time.
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/pump.t b/lib/IPC/Run/t/pump.t
index 12a828415b..7878d786b2 100644
--- a/lib/IPC/Run/t/pump.t
+++ b/lib/IPC/Run/t/pump.t
@@ -8,11 +8,11 @@ pump.t - Test suite for IPC::Run::run, etc.
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/run.t b/lib/IPC/Run/t/run.t
index 7151222a90..130a18c977 100644
--- a/lib/IPC/Run/t/run.t
+++ b/lib/IPC/Run/t/run.t
@@ -8,11 +8,11 @@ run.t - Test suite for IPC::Run::run, etc.
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/signal.t b/lib/IPC/Run/t/signal.t
index 4ce2b87ede..399bd527e4 100644
--- a/lib/IPC/Run/t/signal.t
+++ b/lib/IPC/Run/t/signal.t
@@ -8,11 +8,11 @@ signal.t - Test suite IPC::Run->signal
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/timeout.t b/lib/IPC/Run/t/timeout.t
index 82e96b1911..394f10998d 100644
--- a/lib/IPC/Run/t/timeout.t
+++ b/lib/IPC/Run/t/timeout.t
@@ -8,11 +8,11 @@ timeout.t - Test suite for IPC::Run timeouts
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/timer.t b/lib/IPC/Run/t/timer.t
index e777fd9da6..85ab5cb65b 100644
--- a/lib/IPC/Run/t/timer.t
+++ b/lib/IPC/Run/t/timer.t
@@ -8,11 +8,11 @@ timer.t - Test suite for IPC::Run::Timer
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
diff --git a/lib/IPC/Run/t/win32_compile.t b/lib/IPC/Run/t/win32_compile.t
index e5564985aa..a71a377df8 100644
--- a/lib/IPC/Run/t/win32_compile.t
+++ b/lib/IPC/Run/t/win32_compile.t
@@ -8,11 +8,11 @@ win32_compile.t - See if IPC::Run::Win32Helper compiles, even on Unix
BEGIN {
if( $ENV{PERL_CORE} ) {
- chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
- unshift @INC, 'lib', '../..';
use Cwd;
$^X = Cwd::abs_path($^X);
$^X = qq("$^X") if $^X =~ /\s/;
+ chdir '../lib/IPC/Run' if -d '../lib/IPC/Run';
+ unshift @INC, 'lib', '../..';
}
}
View Lorry Controller Status