人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

Perl についての質問です。

プログラムがおいてあるフォルダーの上のフォルダー名を調べるためにはどうしたらいいでしょうか?

わかりにくいと思いましたので図を添付致します。

環境は、
Windows XP SP2
Perl ver 5.8.8
Apache HTTP Server 2.2.3
です。


1176343954
●拡大する

●質問者: zachouR
●カテゴリ:コンピュータ インターネット
✍キーワード:Apache HTTP Perl Windows XP フォルダー
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

1 ● studioes
●35ポイント

PERLでは環境変数として、現在実行しているスクリプトの絶対パスが渡されます。

$ENV{'SCRIPT_FILENAME'}

図の場合は、 ドライブ:/boss_folder/main_folder/main.cgiが戻るわけです。

これを正規表現で処理すればOK。

http://q.hatena.ne.jp/1175671185

◎質問者からの返答

ありがとうございます!

助かりました。


2 ● b-wind
●35ポイント
use File::Spec;

my $abs = File::Spec->rel2abs($0);
my @dirs = File::Spec->splitdir($abs);
print $dirs[-3];

File::Spec - portably perform operations on file names - search.cpan.org

◎質問者からの返答

すぐに使わせていただきます!

いつも、ありがとうございます!

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ