A strange phenomena with Module Cwd

[Scott]

[scott@FreeBSD ~/perl]$ cat cwd.pl
#!/usr/bin/perl
#
use Cwd;
$dir = getcwd();
print "$dir\n";
[scott@FreeBSD ~/perl]$ perl cwd.pl
/usr/home/scott/perl # How does this "/usr" prefix come?
[scott@FreeBSD ~/perl]$ pwd
/home/scott/perl
[scott@FreeBSD ~/perl]$

 

[Ben Morrow]

[scott@FreeBSD ~/perl]$ cat cwd.pl
#!/usr/bin/perl
#
use Cwd;
$dir = getcwd();
print "$dir\n";
[scott@FreeBSD ~/perl]$ perl cwd.pl
/usr/home/scott/perl # How does this "/usr" prefix come?
[scott@FreeBSD ~/perl]$ pwd
/home/scott/perl

I would guess that /home is a symlink to /usr/home. If you run /bin/pwd
instead of the shell builtin it should give the same result as perl.

Ben