This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
test tweak
authorGurusamy Sarathy <gsar@cpan.org>
Sat, 29 Apr 2000 20:51:49 +0000 (20:51 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Sat, 29 Apr 2000 20:51:49 +0000 (20:51 +0000)
p4raw-id: //depot/perl@6020

t/lib/open3.t

index 7cd0ca3..bf042bf 100755 (executable)
@@ -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) = @_;