develooper Front page | perl.perl5.porters | Postings from January 2018

Re: [perl #132648] Cwd: different return values between pure perland XS variants

Thread Previous | Thread Next
From:
Zefram
Date:
January 16, 2018 10:45
Subject:
Re: [perl #132648] Cwd: different return values between pure perland XS variants
Message ID:
20180116104538.GQ22873@fysh.org
Tony Cook wrote:
>If this what you need?

Nearly.  Instead of the -d line, please do

    print stat($cwd) ? join",",stat(_) : $!, "\n";

and please show the output of Cwd::_backtick_pwd(), not just getcwd().
For good measure, please do

    print $_, " ", \&{"Cwd::$_"}, "\n"
	foreach qw(cwd getcwd fastgetcwd fastcwd _backtick_pwd _perl_getcwd);

-zefram

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About