煩悩ブログ-あと10日分-mi(ミミカキエディット)でタグだけ小文字変換

マックの場合で説明

mi → モード設定 →「ツール」タブで下記を新規追加

662 : 名称未設定 : 04/05/19 17:06 id:lxpR7vIm [3回発言]
タグのみ小文字に変換
以下（ >>663 ）の内容でツールを作る。
テキストを選択して実行すると選択範囲のタグが小文字になる。
タグ属性判別の精度に自信がないのでご注意を(´д｀;)
コピペの際はバックスラッシュとかチルダの確認を

663 : 名称未設定 : 04/05/19 17:07 id:lxpR7vIm [3回発言]
#!/usr/bin/perl
#replace_selected
$_=$ARGV[1];
s/(<.*?>)/&mylc($1)/ge;
s/(<\w+(?:\s+|>))/lc($1)/eg;
s@()@lc($1)@eg;
print $_; exit;
sub mylc{
$str = $_[0];
$str =~s/(\s?)([^A-Z\"]+)([A-Z]+)([ \t]?)=(\s?)/$1.$2.lc($3).$4.'='.$5/ge;
return $str;
}

ソース
http://logsoku.com/thread/pc.2ch.net/mac/1050556756/#662

神様ありがとう！！！