下のようなテキストファイルがあります。

c:\1.txt
c:\new
c:\new\aaa.jpg
c:\いろは\ni
c:\to\ccc.dat

ここから

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


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

回答の条件
  • URL必須
  • 1人2回まで
  • 登録:2008/01/16 10:58:25
  • 終了:2008/01/16 13:24:56

回答(1件)

id:yoshifumi1975 No.1

yoshifumi1975回答回数58ベストアンサー獲得回数102008/01/16 13:19:15

ポイント60pt

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

ソース(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/

id:porinki07

できました!

ありがとうございます!

2008/01/16 13:24:40
  • id:su-momo
    MP3の質問について回答したものです。
    質問の意味をとりちがえて、検討違いな回答をしてしまってすみませんでした。
    その後気になって、必死に探したので、
    こちらで気付いてもらえるかわかりませんが、
    MP3の質問についてコメントがOKになるまで待てなかったので、
    こちらに書かせていただきます。

    サンヨーから、このような製品が出ています。
    容量8Gで、単4電池だそうです。

    http://plusd.itmedia.co.jp/lifestyle/articles/0711/06/news082.html
    http://www.sanyo-audio.com/icr/ps390rm/index_ps390rm.html

    お騒がせしてすみませんでしたm(_ _)m

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません