From: Gurusamy Sarathy <gsar@cpan.org>
Date: Sat, 29 Apr 2000 20:51:49 +0000 (+0000)
Subject: test tweak
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=945d6bad06c27bf93b3917eb3a345a4f0cd2de10;p=p5sagit%2Fp5-mst-13.2.git

test tweak

p4raw-id: //depot/perl@6020
---

diff --git a/t/lib/open3.t b/t/lib/open3.t
index 7cd0ca3..bf042bf 100755
--- a/t/lib/open3.t
+++ b/t/lib/open3.t
@@ -20,7 +20,7 @@ use IO::Handle;
 use IPC::Open3;
 #require 'open3.pl'; use subs 'open3';
 
-my $perl = './perl';
+my $perl = $^X;
 
 sub ok {
     my ($n, $result, $info) = @_;