08/02/09 15:25:30
(defun replace-white-space-to-2ch-board-format (begin end)
(interactive
(let ()
(list
(if (and transient-mark-mode mark-active)
(region-beginning))
(if (and transient-mark-mode mark-active)
(region-end)))))
(let ((temp (buffer-substring begin end))
(buffer (get-buffer-create
"*replace-white-space-to-2ch-board-format*")))
(with-current-buffer buffer
(erase-buffer)
(insert temp)
(untabify (point-min) (point-max))
(call-process-region (point-min) (point-max) shell-file-name t buffer nil
shell-command-switch "perl -pe 's/^\\s*/q{ } x length($&)/e'")
(kill-ring-save (point-min) (point-max))
(kill-buffer buffer))))
test
56:名無しさん@お腹いっぱい。
08/02/09 17:23:40
begin 644 /dev/stdout
M'XL(`(MCK4<``^V436[;,!"%U_$I!D:1D`8&`KKM58("-#F2B%`CA3]VVJ9W
M+TDICMW$0=JFZ:;:B*1(SGMO/D@8:A.#I\DI3;CO;20,4QG'$3_J'K>C\@;;
MT0\J@MA29QF(C5P!",N1O-+1[BA/03@;(I11_M2"4&P@>L7!$D<<E+_!830$
M=30?DW5W/>'SU2-CK<"6.RG_\*:B4M9;A*.L740:IFPAM2UY#&D;HL]UX-'3
M0\D;ZQPR[<M5KPH&:Q*L''9?[321P92(M1D)2M?M.6ILE;BE[(_E`"1=1^Y
MFOV`Z"CBXDU[4I%^K@JPWKRRV&8M'_/T%)-GW"F7<LH78F]CCSIY7WJQ5)]?
MJXNL*A,1:%F7=<5R(!^ARB[SQ%%M;?L%Q#3:TD_+\C!6=W+>I55NPN1'32'@
MW-)S!R#TE#>WUA&R&G+HBR!@ZY[&</K,9_4X#)DR#-F=[F$]D7>`$\%5:#Y?
M7X=-<_OMDK=A^O0=[L`1=[$7'RYE0U?K66^@>'N2U3.HG3,LCT3.])WD>JX9
MOP_14T[?@:KSU5_@K4;R`G)+:*?4+8O'X"U+[T'5\T05SX#ZOGHN/Z_&T*X)
MT8PIK@_ZWH*B\P2]%3V)BYO</D/5RG]X_C(\#TG?SQ29?P/,#VV\J_@N"```
`
end
test
57:名無しさん@お腹いっぱい。
08/02/09 17:53:01
begin-base64 644 /dev/stdout
H4sIAHhqrUcAA+2V3Y7bIBCFrzdPMbKqXYiEIvW2r7JaleBxjNYGFnCStum7
dwCvkzTJKt2f9qbcGDDDnDnzOWE1NmFYhggeXScVik2rI4rg0jxa8Vm1Ymml
r0VjfS+jWGEUHlfaGmB8BsA6TdE0oalugElTQ/TSBI0mil76R9HbGiHPpIp6
jTyfzhHlJrGkhzHarDh/401oak5jNmNU2WCuLQtYlgApnO6sGm9NpAXQa8Ct
7F2HVapW07YvyWcl7Z/axotrSDlZxN5R6qFp0IvcB08mwF7Lsx+PuuuEwc31
CbNQIzux+q6dw1oMAxpVW5wsG0fS8PveayycMgKjMrKLOQJyBEQLt2YZ3Jdq
X34pHFgyZzRBeZTxRCPdNb9Sxrzieyo8xsEbsZbdQKzcsI2OrVCD94moMXt5
zG5IFXU24LjP8442AX2EXFBaDybKpW6+AXNWJyq14dNcbnk5pSR1y3mrMITp
YzkfAKFFOtzoDoWRPfk0CgKju1MbjkeJVbbv6VsRgapTLVQOfQfCIdyFxcP9
fZgvnn4U63/CFjo0q9iyT7d8gXdV0RswPh15dYbJSwXzA5EF0yNfLzXj9Xid
AL3nDVVrU6926cguv08/GKL/YOYua3uBxmzYC0COlh4zOW4eYjlu/Q3mzvOW
agahDv2GRY3rRYi1HWI1SXwPzC4j9l54DSYVRB2sMVcz0VXWPv8lfH0zGXf/
mfxAJp+7tytw1v8Iwl+60UzYXwkAAA==
====
test
58:名無しさん@お腹いっぱい。
08/02/13 19:07:06
テストはこちらで。
[test] 書きこみテスト 専用スレッド 1 [テスト]
スレリンク(unix板)
59:名無しさん@お腹いっぱい。
08/02/13 20:21:59
今も接続出来る。。。