[#41251] mswin32(もしくはActiveScriptRuby)でRuby/Tkを使うには? — "conundrum /" <conundrum@...>

conundrumです。

12 messages 2005/10/11

[#41284] 条件に合う見出しの内容だけを抽出 — isawa_kz <isawa_kz@...>

井沢と申します。

32 messages 2005/10/14
[#41299] Re: 条件に合う見出しの内容だけを抽出 — Kousuke Honda <kousuke4@...> 2005/10/14

本田です。はじめましてです。

[#41300] Re: 条件に合う見出しの内容だけを抽出 — isawa_kz <isawa_kz@...> 2005/10/14

井沢です

[#41301] Re: 条件に合う見出しの内容だけを抽出 — しん <dezawa@...> 2005/10/14

出沢です

[#41340] Date へのメソッド追加要望 — MATSUNO Tokuhiro <tokuhirom@...>

tokuhirom@Inamode6:897 です。

19 messages 2005/10/22

[#41371] 北九州市の rubyist へ — Akimichi Tatsukawa <akimichi_tatsukawa@...>

こんにちは。立川察理と申します。

13 messages 2005/10/25

[#41400] 全角スペースを区切りとした文字列分解で — 中村 英夫 <cxn03651@...>

中村と申します。

10 messages 2005/10/27

[#41416] Rubyでこういうの作れますか?(中央銀行編) — Omoti <omoti@...24.net>

Rubyで中央銀行システムを作りたいんですが、できますか?

14 messages 2005/10/29
[#41418] Re: Ruby でこういうの作れますか?(中央銀行編) — Sako Hiroshi <sakoh@...2.so-net.ne.jp> 2005/10/29

[#41420] Re: Ruby でこういうの作れますか?(中央銀行編) — Omoti <omoti@...24.net> 2005/10/29

そんな大規模じゃないですよ!

[#41425] "Programming Ruby 2nd edtion"の邦訳について — "higashi ryota" <ryochin_hgs@...>

始めまして。既出だったらすいません、過去ログで検索したのですが見つけられませ

10 messages 2005/10/30
[#41428] Re: "Programming Ruby 2nd edtion"の邦訳について — Yukihiro Matsumoto <matz@...> 2005/10/30

まつもと ゆきひろです

[ruby-list:41299] Re: 条件に合う見出しの内容だけを抽出

From: Kousuke Honda <kousuke4@...>
Date: 2005-10-14 14:10:16 UTC
List: ruby-list #41299
本田です。はじめましてです。

おもしろそうだったので考えてみました。
# さらっと書けないとところが、まだまだです。

'Title-' で始まる行を区切りとする場合。
-----------------------------------------------------------
a = ["Title-1","Title-B"]
pat = a.collect {|s| /^\s*#{s}/ }
pat0 = /^\s*Title-/

while gets
  break if pat.empty? and pat0 =~ $_
  puts $_ if pat.empty?
  pat.shift if pat[0] =~ $_
end
-----------------------------------------------------------

インデントの変化で区切りとする場合。
-----------------------------------------------------------
a = ["Title-1","Title-B"]
pat = a.collect {|s| /^\s*#{s}/ }

ind = 0
while gets
  break if pat.empty? and (~ /\S/) < ind
  if pat.empty? then puts $_; ind = (~ /\S/); next end
  pat.shift if pat[0] =~ $_
end
-----------------------------------------------------------

インデントのとらえ方をちょっと変えたもの。
-----------------------------------------------------------
a = ["Title-1","Title-B"]
pat = a.collect {|s| /^\s*#{s}/ }

ind = 0
while gets
  break if pat.empty? and (~ /\S/) <= ind
  puts $_ if pat.empty?
  if pat[0] =~ $_ then ind = (~ /\S/); pat.shift end
end
-----------------------------------------------------------

配列に指定する数が、見出しの階層数よりも少ない場合は出力
がいまいちです。

  a = ["Title-2"] 

$ ruby sample01.rb data.txt
    Title-A
        content4
        content5

$ ruby sample02.rb data.txt
    Title-A
        content4
        content5
    Title-B
        content6


--------------------------------------
Know more about Breast Cancer
http://pr.mail.yahoo.co.jp/pinkribbon/


In This Thread