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

下のようなテキストファイルがあります。
c:\1.txt
c:\new
c:\new\aaa.jpg
c:\いろは\ni
c:\to\ccc.dat

ここから

c:\new
c:\いろは\ni


のようにperlなどで拡張子のないものだけを抽出する方法はあるでしょうか。


●質問者: porinki07
●カテゴリ:コンピュータ
✍キーワード:.jpg aaa CCC DAT NI
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● yoshifumi1975
●60ポイント

------------

ソース(test.pl)

------------

open(FH, $ARGV[0]) || die "can't open $ARGV[0]";

while(<FH>){

print if(/\\[^.]+$/);

}

------------

テキストファイル(test.txt)

------------

c:\1.txt

c:\new

c:\new\aaa.jpg

c:\いろは\ni

c:\to\ccc.dat

---


------------

実行例

------------

perl test.pl test.txt


------------

実行結果

------------

c:\new

c:\いろは\ni



こんな感じでしょうか。

URLはダミーです。

http://example.com/

◎質問者からの返答

できました!

ありがとうございます!

関連質問


●質問をもっと探す●



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