LL Golf Hole 9 を打ってみるテスト

なんとなく kuzha で挑戦。俺言語だしどう書くのほうにはポストできないなぁ……(^-^;

プログラム

juse: 'java.io.*' local;
juse: 'java.net.*' local;
url = jnew: URL 'http://ll.jus.or.jp/2008/blog/archives/38/trackback';
conn = url openConnection;
conn setDoOutput: true;
conn setRequestProperty: 'Accept-Language' 'ja';
output = jnew: PrintStream (conn getOutputStream);
output print: 'title=LL+Future+に行ってきました&excerpt=最終9番ホールを打ってみます。楽しいイベントをどうもありがとうございました&url=http://d.hatena.ne.jp/SiroKuro/20080905/1220597076&blog_name=SiroKuroPage';
output close;
input = jnew: BufferedReader (jnew: InputStreamReader (conn getInputStream));
while s = input readLine do
    s puts;
end
input close;

結果

D:\SiroKuro\docs\Eclipse\Kuzha>kuzha trackback.txt
<?xml version="1.0" encoding="utf-8"?>
<response>
<error>0</error>
</response>

基本は java といっしょ。kuzha 側ではストリーム操作のオブジェクトを用意していないので、j/invoke 使って java のクラスを操作するという形にしてみました。