[#31787] MIME decoding — Tietew <tietew@...>

Tietew です。

24 messages 2001/10/08

[#31866] 先祖がえり — "T.Shirakawa" <niegh@...>

はじめまして つい最近、MLに登録した白川です。

20 messages 2001/10/14
[#31867] Re: 先祖がえり — Koji Arai <JCA02266@...> 2001/10/14

新井です。

[#31889] Ruby Conference — Minero Aoki <aamine@...>

あおきです。

31 messages 2001/10/16
[#31905] Re: Ruby Conference — matz@... (Yukihiro Matsumoto) 2001/10/17

まつもと ゆきひろです

[#31923] Re: Ruby Conference — TAKAHASHI Masayoshi <maki@...> 2001/10/17

高橋征義です。

[#31932] しぶらぐ — "KANEMITSU Masao" <masao-k@...> 2001/10/18

http://www.ne.jp/asahi/masao-k/home/newpage1.htm

[#31906] 数値の配列の一部を文字列にして、多重代入したい — みかみまさと <kofu@...>

こんにちは。みかみにございます。

9 messages 2001/10/17

[#32016] Re: コメント削除スクリプト — "Tatsuaki Nagai" <Tatsuaki_Nagai@...>

こんにちは。永井です。

15 messages 2001/10/24
[#32018] Re: コメント削除スクリプト — TASHIRO Katsuya <tashiro_katsuya@...> 2001/10/24

田代と申します.

[#32123] dRuby の DRbUndumped#_dump は? — FUJIMOTO Hisakuni <hisa@...>

こんにちは、藤本です。

21 messages 2001/10/30
[#32124] Re: dRuby の DRbUndumped#_dump は? — m_seki@... 2001/10/30

[#32126] Re: dRuby の DRbUndumped#_dump は? — shudo@... 2001/10/31

咳さん wrote:

[#32145] Test::Unit — MUTOH@...

むとうです。

20 messages 2001/10/31

[ruby-list:32017] Re: コメント削除スクリプト

From: tomkob@...
Date: 2001-10-24 07:14:24 UTC
List: ruby-list #32017
こんにちわ、小林です。

>  これでなんとか、実行はできるようになったんですが、一行に
>  2つコメントがある場合、たとえば
>    /*...*/.../*...*/
>  となっている場合にちゃんと動かないようです。
>  正規表現の勉強もしないといけないみたいですね。

あと以下のような場合2行目がコメント扱いでなくなるような
気がします。

/*
  a = 0;
*/

自分も前に同じような事をawkでやりましたが、参考までにそれを
添付します。これは //スタイルのコメントには対応していません
ので了承を。本当はJSPの <% ... %> を抽出したり、取りはぶい
たりするのに作ったのですが。

#!/usr/xpg4/bin/awk -f

BEGIN {
    NumCol = 0;
    flg = 0;
}
{
    wflg = 0;
    for(i = 1; i < length($0) ; i++) {
        if ("/*" == substr($0, i, 2))
            flg = 1;
        if ("*/" == substr($0, i, 2)) {
            flg = 0;
            i++;
            continue;
        }
        if (flg == 0) {
            printf("%s", substr($0, i, 1));
            wflg = 1;
        }
    }
    if (flg == 0) {
        printf("%s", substr($0, i, 1));
        wflg = 1;
    }
    if (wflg == 1) {
        printf("\n", substr($0, i, 1));
    }
}





_______________________________________________________


In This Thread

Prev Next