Perlを使って2ちゃんねるにHello Worldを書き込むat TECH
Perlを使って2ちゃんねるにHello Worldを書き込む - 暇つぶし2ch193:縺ッ繧阪�シ
11/05/18 10:17:24.74
Hello World


194:縺ッ繧阪�シ
11/05/18 10:20:30.79
Hello World


195:縺ッ繧阪�シ
11/05/18 10:21:20.63
Hello World


196:縺ッ繧阪�シ
11/05/18 10:21:46.95
縺薙s縺ゥ縺薙◎


197: 忍法帖【Lv=2,xxxP】
11/06/05 20:10:45.16
だめだな。

198:デフォルトの名無しさん
11/06/29 19:43:58.10
test

199:デフォルトの名無しさん
11/06/29 19:49:13.06
48656C6C6F20576F726C64

200:デフォルトの名無しさん
11/11/20 14:26:58.36


201:デフォルトの名無しさん
11/12/16 16:50:48.08
LWPを使っての書き込みで詰まってます。
use utf8; use LWP; use Encode...;
my $ua = LWP::UserAgent->new(agent => "Monazilla/1.00 hoshu-bot.pl/$VERSION");
$ua->default_header(Referer => "URLリンク($c->{host}.2ch.net)");

sub sjis { encode('cp932', $_[0]) }

my $res = $ua->post("http://" . $c->{host} . ".2ch.net/test/bbs.cgi?guid=ON",
[
# パラメタ省略
submit=> sjis('書き込む'),
MESSAGE=> sjis($message),
],
Content_Type => "application/x-www-form-urlencoded; charset=Shift_JIS",
);

エンコードしてるはずなんですけどねえ。ちなみに全角2文字が8バイトで
出ます。考えられるのは、エンコードに失敗してるか、sjisをさらに
Unicodeにデコードしてそれを出してるかな気がするんですが。

202:デフォルトの名無しさん
11/12/16 16:51:54.57
あー書き忘れ。つまり書き込みには成功するんだけど文字化けしちゃうって
ことです。

203:デフォルトの名無しさん
12/01/21 06:06:29.93
UAほしゅぼっとw
もう解決しただろうなあ、がんばれー

204:デフォルトの名無しさん
12/03/20 23:34:46.58
a

205:デフォルトの名無しさん
12/03/20 23:36:16.28
hello world

206:デフォルトの名無しさん
12/03/21 00:26:47.01
ハローワールド

207:デフォルトの名無しさん
12/03/21 00:27:49.13
繝上Ο繝シ繝ッ繝シ繝ォ繝・

208:デフォルトの名無しさん
12/03/27 01:50:58.63
WWW-2ch なんてモジュールもあるのか

209:デフォルトの名無しさん
12/03/27 01:57:14.71
>>99
これってIEのバージョンは何で動くんだろ?
6か7か

210:営利利用に関するLR審議中@詳細は自治スレへ
12/04/05 15:37:41.04
9でも動いたが

211:営利利用に関するLR審議中@詳細は自治スレへ
12/04/05 15:41:51.55
helloworld

212:営利利用に関するLR審議中@詳細は自治スレへ
12/04/08 07:01:56.03
hello,world

213:営利利用に関するLR審議中@詳細は自治スレへ
12/04/08 07:08:26.09
はろーわーるど


最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch