-PR-
解決済み

perl cgiでサブディレクト内のファイル名取得

  • 困ってます
  • 質問No.62036
  • 閲覧数164
  • ありがとう数0
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 13% (3/22)

perl cgiでサブディレクト内のファイル名取得

$dir="../01/";
$id_c="*.c";
$file_c=$dir.$id_c;
@InputFileAllBuf_c = glob($file_c);
$InputFile = $fileAll;
open IN,"$InputFile";
@InputAll = <IN> ;
close(IN) ;
のようにすると、指定dir内のファイル名が
取得できます。
さらに、指定dirの直下たけでなく、
指定dir内のサブディレクトも、
ファイル名を取得する方法ありますか?
よろしくお願いします。
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

質問者が選んだベストアンサー

  • 回答No.1
レベル9

ベストアンサー率 29% (28/95)

Perlカテゴリがあるので、そちらのほうが適切な回答が得られるとおもいますが。

File::Findモジュールを使うと、簡単に書けます。
モジュールを使わないなら、opendirでぐるぐるまわす方法もあります。

ex)
use File::Find;

finddpth(\&list, "$dir");
exit;

sub list{
print $File::find::name, "\n";
}
-PR-
-PR-
このQ&Aのテーマ
このQ&Aで解決しましたか?
AIエージェント「あい」

こんにちは。AIエージェントの「あい」です。
あなたの悩みに、OKWAVE 3,500万件のQ&Aを分析して最適な回答をご提案します。

-PR-
-PR-
このやり方知ってる!同じこと困ったことある。経験を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


専門家があなたの悩みに回答!

-PR-

ピックアップ

-PR-
ページ先頭へ