ホームディレクトリの取得


 File::HomeDirモジュールを使うと各種のディレクトリ名を取得することができます。
use strict;
use warnings;
use File::HomeDir;

my $home = File::HomeDir->my_home;
my $desktop = File::HomeDir->my_desktop;
my $docs = File::HomeDir->my_documents;
my $music = File::HomeDir->my_music;
my $pics = File::HomeDir->my_pictures;
my $videos = File::HomeDir->my_videos;
my $data = File::HomeDir->my_data;

printf "ホーム                | %s\n", $home;
printf "デスクトップ          | %s\n", $desktop;
printf "マイドキュメント      | %s\n", $docs;
printf "マイミュージック      | %s\n", $music;
printf "マイピクチャ          | %s\n", $pics;
printf "マイビデオ            | %s\n", $videos;
printf "アプリケーションデータ| %s\n", $data;

関連項目

カレントディレクトリの取得