Perlゼミ

1. Perl
›
2. ファイル操作
›
3. here

カレントディレクトリ名を取得する

カレントディレクトリ名を取得するにはCwdモジュールのgetcwd関数を使います。

use Cwd 'getcwd';
my $cur_dir = getcwd;

サンプル

カレントディレクトリ名を取得するサンプルです。

use strict;
use warnings;
use Cwd 'getcwd';

# カレントディレクトリ名を取得する。
print "1: カレントディレクトリ名を取得する。\n";
my $cur_dir = getcwd;
print $cur_dir, "\n";