http://www.perlmonks.org?node_id=21282


in reply to Re: Out of a hole?
in thread Out of a hole?

If you want to be a bit more platform independent then stick a test on $^O to determine what sort of machine your running on. 
if($^O eq "MSWin32")
{
    $pwd = `cd`;
}
else
{
    $pwd = `pwd`;
}

[download]
Barn.

In Section Seekers of Perl Wisdom