require "pwd.pl";

&initpwd;
..
&chdir($newdir);