$ locate Cwd.pm
/usr/lib/x86_64-linux-gnu/perl-base/Cwd.pm
$ perl -MCwd -le 'print cwd()'
/home/wcp
$ uname -a
Linux localhost 4.9.50-x86_64-linode86 #1 SMP Thu Sep 14 19:28:20 UTC 2017 x86_64 x86_64 x86_64 GNU/Linux