[1] Perl では、標準モジュールの Cwd の getcwd 関数で現在ディレクトリーを得ることができます。

[2] Perl では、標準の chdir 関数に引数を指定することで現在ディレクトリーを変更できます。 chdir は変更できたか否かを返します。