On Tue, Nov 16, 2004 at 10:22:51PM -0600, Ken Williams wrote:
> I don't have a 5.005 perl to test against ATM - would the following
> patch work around that syntax error?
No, you've only got two args to play with. This is the equivalent
5.005-ism.
open(REALPATH, "-|") || exec '/usr/bin/fullpath', '-t', $path;
> +++ 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;
--
Michael G Schwern [EMAIL PROTECTED] http://www.pobox.com/~schwern/
You're the sickest teenager I've ever set my wallet on.
