On Nov 16, 2004, at 11:51 AM, Autrijus Tang wrote:
It will be wonderful if PathTools can revert to pure-perl mode in Cwd.pm,
as part of its installation process. Also, Cwd.pm currently uses a
multi-arg open() call in a qnx-specific subroutine, which produces a
syntax error for 5.005_03. After manually copying Cwd.pm and delete
that single line, it worked on the 5.005_03 machine.
I don't have a 5.005 perl to test against ATM - would the following patch work around that syntax error?
===================================================================
RCS file: /Users/ken/src/CVS-repository/modules/PathTools/Cwd.pm,v
retrieving revision 1.2
diff -u -r1.2 Cwd.pm
--- Cwd.pm 2004/09/07 03:27:36 1.2
+++ Cwd.pm 2004/11/17 04:17:32
@@ -651,7 +651,8 @@
my $path = @_ ? shift : '.';
local *REALPATH;- open(REALPATH, '-|', '/usr/bin/fullpath', '-t', $path) or
+ my @cmd = ('/usr/bin/fullpath', '-t', $path);
+ open(REALPATH, '-|', @cmd) or
die "Can't open /usr/bin/fullpath: $!";
my $realpath = <REALPATH>;
close REALPATH;===================================================================
-Ken
