Cwd::getcwd doesn't take arguments, but ::realpath does
$ prove t\zzz-spec.t
t\zzz-spec.t .. 1/?
# Failed test 'path('C:')'
# at t\zzz-spec.t line 206.
# got: 'C:/Documents and Settings/username'
# expected: 'D:/perl/cpan/build/Path-Tiny-0.029-r_iWUJ'
# Looks like you failed 1 test of 91.
t\zzz-spec.t .. Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/91 subtests
$ perl -MCwd -le " print Cwd::getcwd(q{C:})"
D:/perl/cpan/build
$ perl -MCwd -le " print Cwd::realpath(q{C:})"
C:/Documents and Settings/username
|