[ruby-dev:10075] text/tabs.rb

青山です。

On Sat, 17 Jun 2000 23:25:02 +0900,
Wakou Aoyama <[e-mail]> wrote:

> あ、そうそう。Perl には、text/tabs という、タブの展開をするライブラリ
> が付いているんですよね。これ、Ruby でもどうでしょう？

作ってみました。ただし、1.5 系以降のみでしか動きません。
(unix には expand, unexpand とうコマンドもあるんですね。)


=begin
$Date: 2000/06/17 23:19:20 $

== EXPAND AND UNEXPAND TABS LIBRARY

text/tabs.rb

Version 0.1.0

Wakou Aoyama <[e-mail]>

== EXAMPLE

        require "text/tabs"
        string_without_tabs = Text::Tabs::expand(string_with_tabs)
        string_with_tabs    = Text::Tabs::unexpand(string_without_tabs)

=end

module Text
  module Tabs
    def Tabs::expand(string, tab_stop = 8)
      cursor = 0
      string.gsub(/([^\t]*)(\t+)/) do
        cursor += Regexp::last_match[1].length
        add_space = Regexp::last_match[2].length * tab_stop
        add_space -= (cursor + add_space) % tab_stop
        cursor += add_space
        Regexp::last_match[1] + " " * add_space
      end
    end

    def Tabs::unexpand(string, tab_stop = 8)
      Tabs::expand(string).gsub(/.{#{tab_stop}}/om) do |match|
        match.sub(/ +\z/, "\t")
      end
    end
  end
end

=begin

== HISTORY

=== Version 0.1.0 - wakou

2000/06/17 23:19:20

- first release.

=end


-- 
青山 和光 Wakou Aoyama <[e-mail]>