use Cwd;
use Config;

chdir $Config{archlib};
print cwd,$/;

chdir 'Pod';
print cwd,$/;

chdir '..';
print cwd,$/;

chdir '/Pod' or warn "eek $!";
print cwd,$/;

chdir '/';
print cwd,$/;
__END__
C:/Perl/lib
C:/Perl/lib/Pod
C:/Perl/lib
eek No such file or directory at - line 13.
C:/Perl/lib
C:/