続きは・・・
サンプル：カレントディレクトリのパスを調べる
Cwdモジュールを使います。
use Cwd;
プログラム例では、getcwd関数で、カレントディレクトリを取得しています。
プログラム例
#!/usr/bin/perl
use Cwd;
$dir = getcwd;
print "現在いるディレクトリ : ".$dir."\n";
実行結果
[it-engineer@home1 perl]# pwd
/home/it-engineer/perl
[it-engineer@home1 perl]# perl 20070604-3.pl
現在いるディレクトリ : /home/it-engineer/perl
[it-engineer@home1 perl]#
