オレッテバ・ス・ゲー

必要なこと

• うｐが十分で簡単である。
• だうんこが十分に簡単である。
• バージョン管理 (必然的にオートコミット)
• パーミッション

アップロードフォームとかカス。HTTP ダウンロードはまぁいいよ？

だとするとやっぱ dav と svn とかしかない？　でも dav もそんなにいい UI があるわけじゃない。いやいいのかなぁあれ。フォームよりはいいけど、うん、うぃんどうずのお話だよ。そうさ。

なんか唐突に lftp の open が失敗するようになった。

$ lftp
lftp :~> open s63.xrea.com
open: ftp: no such tcp service 

lowreal.net の日記がさらに書きにくくくく。XML 書くだけで最近ダルイのに。もう Trac Wiki 記法で殆ど書きたい。マークアップとか無駄無駄。でも ill-wormed はやめて！　パースできないから！
RDF でなんでもやりたいよなぁ。ホントに。

cygwin の setup.exe を実行したらなおった。っぽい。他でえらーでてたのが気になるけど。

PHP 使えっていう声が聞こえる。

マークの使いかたわからなくて、使わないようにしてたけど、耐えられないので覚える。

• mx x にマーク　なんの表示もでない＞＜
• `x (マーク x に戻る)

これだけでいいや

バッククオートふたつが便利だなぁ。前いたところに戻る。

:s が楽しい。V で選択して範囲内いっかつ置き換えが楽しい。どばーんって。xyzzy だと C-SPC C-n C-r TAB TAB Alt-R C-w とか長い手順ふむもんなぁ。

http://subtech.g.hatena.ne.jp/secondlife/20060801/1154406385
wktk

コメントで変数宣言してそれはそのまま残しておくと、色とかを頭に書くとかも自然に同時にできる。ERB だとめんどいので軽いパーサ書いてあげるのがよさそう。

/*
 * key-color1 = #708f96
 * key-color2 = #123456;
 */

h1 {
    background: $key-color1;
}

#footer {
    background: $key-color1;
    color: #fff;
}

#footer address {
    color: $key-color1;
    background: $key-color2;
}

$ って使われたっけ

#!ruby
pre = ARGF.read
vars = Hash[*pre.scan(/^\s*\*\s+(\$[^\s;]+) = (.+$)/).flatten]
ret = pre.gsub(/\$[^\s;]+/) do |match|
    if vars.key?(match)
        vars[match]  
    else
        match
    end
end

puts ret

ハイパー簡略化、が、これだと変数宣言も置換される！

やっぱ結構めんどいなぁ。ディレクトリを変数にしたい！　とかだとこれでは無理だ？　#{var-name} で展開にしたらいいのかな

/*
 * [key-color1] = #123456
 * [key-color2] = #234567
 */

h1 {
        background: $key-color1;
}

#footer {
        background: $key-color1;
        color: #fff;
}

#footer address {
        color: $key-color1;
        background: $key-color2;
}

#!ruby

pre = ARGF.read
vars = Hash[*pre.scan(/^\s*\*\s+\[([^\s;]+)\] = (.+$)/).flatten]
ret = pre.gsub(/\$[^\s;]+/) do |match|
        name = match.sub("$", "")
        if vars.key?(name)
                vars[name]
        else
                match
        end
end

puts ret

#!ruby
pre = ARGF.read
vars = Hash[*pre.scan(/^\s*\*\s+\[([^\s;]+)\] = (.+$)/).flatten]
#p vars
ret = pre.gsub(/\#\{([^\s;]+)\}/) do |match|
        if vars.key?(Regexp.last_match[1])
                vars[Regexp.last_match[1]]
        else
                match
        end
end

puts ret

ううーん？

とかやってると、なんか変な CSS 書かなくなるなぁ。すぐにダメな書き方がわかるのはいい感じだ。ダメな書き方って変な話だけど。

#!perl

use strict;
use warnings;

my $pre = join "",  <ARGV>;
my %vars = ($pre =~ /\* \[([^\s;]+)\] = (.+)$/gm);

$pre =~ s[#\{(.+?)\}]{$vars{$1} ? $vars{$1} : $&}ge;

print $pre;

これだけ書くのに30分ぐらいかかった！！　むずい。

:debug command

が表向きだよ。でも

:set verbose=9
:so %

まくり！　って id:secondlife さんがいってた。ので、いくつか試してみよう。