2007-02-01から1ヶ月間の記事一覧

It's all text

https://addons.mozilla.org/firefox/4125/こいつをインストールし、エディタにxyzzycli.exeを登録すると。 もう文句ありません。 しばらくはこれでOK。

.xyzzy

;インクリメンタルサーチにする。 (require "isearch") :C-vをペーストにする。 (define-key *global-keymap* #\C-v 'paste-from-clipboard ) ;rubyもーdを使えるようにする ;(load-library "Gates");Gates が好きならファイルの先頭に (load-library "ruby…

convertの大きさ比較

image.jpg 画像サイズ640x480 94441バイト 以下のコマンドで実験 $ruby -e '240.step(10,-10){|s| print "|#{s}";10.step(100,10){|q| print "|",`convert -resize #{s}x#{s} -quality #{q} image.jpg jpeg:-|uuencode -m -|wc -c`.chop};print "|\n"}' 画像…

convertのオプション研究

$ convert +dither -quality 30 -resize 200x200 image.jpg jpeg:- |tee test.jpg |uuencode - | wc -c 3842 $ convert +dither -quality 30 -resize 150x150 image.jpg jpeg:- |tee test.jpg |uuencode - | wc -c 2548 $ convert +dither -quality 30 -resi…

日本語を含む文字列を指定バイト以内で切り出す

karoに教えてもらった require 'jcode' $KCODE="euc" def foo(s,n); s.chop! while(s.size>n); s; end; foo('abcあいうdef',6)なんかこれの為だけに先頭で関数宣言するのも格好悪いし(教えてもらってなんたる言いぐさ)、ループで書き直してみた s='abcあい…

whileの返値のなぞ

前エントリによりlispと比較しながらrubyのwhileの謎を追究してみる(若干)lisp(gosh)の場合は以下のように、if,whileともに最後に評価した式の値を返す。 gosh> (if #t 'true 'false) true gosh> (if #f 'true 'false) false gosh> (while #f 'dammy) #tと…

SMTPヘッダ形式に変換する。

nkf

いろいろ考えてしまったが-Mオプションだけでいいみたい。 $ echo "subject: testてすとtest" | nkf -M ; echo subject: =?ISO-2022-JP?B?dGVzdBskQiRGJDkkSBsoQnRlc3 $ echo "subject: testtest" | nkf -M ; echo subject: testtestのように2バイト文字が…

標準入力/標準出力で変換する

いつものように-でいいのだが画像フォーマットの指定は-の前に フォーマット:- と表記する cat a.gif | convert -resize 100x100 gif:- jpeg:-> b.jpg 普通にオプションを探してはまった(笑

中間ファイルを作らずに外部コマンドでフィルタを実行する

io.close_writeしないとio.readでとまってしまう。 io = IO.popen("convert -resize 100x100 - gif:- ","r+") io.write(File.open("aaa.jpg") io.close_write print [io.read].pack("m") #output base64

でこメールの作り方

追記:こちらの方が詳しいデコメールをrubyから送る方法 - 計算機と戯れる日々なぜテキストが必要なのかかからない(笑 テキスト部分は最低一文字でもOK(どうせ無視される) 大きさはversion1.0 2.0では10Kまで。 version3.0対応のやつに買い替えるかな。(…

バグと思ったが仕様を読んでいなかった

require 'rexml/document' doc = REXML::Document.new("<x>a</x>")この状況下で p doc.elements['/x'].text "a"となる。こまったもんだ。 CDATAといえば、REXMLでこういう罠にはまったことが。 ところが、マニュアルから以下の記述を発見 _最初_の子テキストの値を…

バイナリを操作する

emacsならばM-x hexl-find-fileでバイナリエディタモードになる。 バイナリでみたいなら hdコマンド

emacsでUTF-8運用

そういや、UTF8運用してからemacsで漢字入力していなかったことに気がついた。 最初は http://0xcc.net/blog/archives/000041.html こっちを見てたんだけど、どうも再読み込みしたとき漢字が化けるので以下を発見、該当部分は以下のみを~/.emacsにいれる。 …

DOMをアクセスする。

#!/usr/bin/ruby -Ku require "rexml/document" doc = REXML::Document.new File.open("./foo.atom") doc.root.each_element('/feed/entry'){|entry| #DocumentクラスからElementクラスへ変更しxpathに合致するElementクラスで繰り返す。 entry.each_element…

rubyでおくるとき

コマンドラインにsendmailを置き忘れていたのでhtmlメールをrubyから送るスクリプト(例題そのまま)を書いた。 docomoの携帯電話のデコメールを実験する為のhtmlメール #!/usr/bin/ruby require 'net/smtp' Net::SMTP.start( 'localhost', 25 ) {|smtp| smt…

俺は楽しめないが米国にスタントショーがあることを理解した。

確かに官能的

雌雄同体での交尾は互いが対称的な構造であるが故に美しい。 って別に人間の同姓の行為を推奨しているわけではないので注意。

真空の力

というか大気圧は水を約10mあげるんだな。 すっかり忘れてた。 石油ポンプで10m以上水をくみ上げるときには 水槽 -9mパイプ-石油ポンプ -> 水槽-9mパイプ-石油ポンプ -> 水槽-9mパイプ-石油ポンプ -> 水槽 または 石油ポンプの柔らかいところを延長する…