Perlを使って２ちゃんねるにHello Worldを書き込む

**デフォルトの名無しさん** · 2007/07/15(日) 16:16:50

俺、がんばる。みてて。

**デフォルトの名無しさん** · 2011/11/20(日) 14:26:58.36

？

**デフォルトの名無しさん** · 2011/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 => "http://$c->;{host}.2ch.net/$c->{board}/");

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にデコードしてそれを出してるかな気がするんですが。

**デフォルトの名無しさん** · 2011/12/16(金) 16:51:54.57

あー書き忘れ。つまり書き込みには成功するんだけど文字化けしちゃうって
ことです。

**デフォルトの名無しさん** · 2012/01/21(土) 06:06:29.93

UAほしゅぼっとｗ
もう解決しただろうなあ、がんばれー

**デフォルトの名無しさん** · 2012/03/20(火) 23:34:46.58

**デフォルトの名無しさん** · 2012/03/20(火) 23:36:16.28

hello world

**デフォルトの名無しさん** · 2012/03/21(水) 00:26:47.01

ハローワールド

**デフォルトの名無しさん** · 2012/03/21(水) 00:27:49.13

繝上Ο繝ｼ繝ｯ繝ｼ繝ｫ繝・

**デフォルトの名無しさん** · 2012/03/27(火) 01:50:58.63

WWW-2ch　なんてモジュールもあるのか

**デフォルトの名無しさん** · 2012/03/27(火) 01:57:14.71

>>99
これってIEのバージョンは何で動くんだろ？
6か7か

2012/04/05(木) 15:37:41.04

9でも動いたが

2012/04/05(木) 15:41:51.55

helloworld

2012/04/08(日) 07:01:56.03

hello,world

2012/04/08(日) 07:08:26.09

はろーわーるど

**niconico** · 2012/08/11(土) 04:12:58.61

という訳で晒しage

**デフォルトの名無しさん** · 2013/03/18(月) 05:50:04.86

Hello わーるど

**デフォルトの名無しさん** · 2013/05/13(月) 03:59:38.53

test

**デフォルトの名無しさん** · 2013/05/13(月) 04:02:44.47

test
tese
test

**デフォルトの名無しさん** · 2013/05/13(月) 04:16:29.89

test2

**デフォルトの名無しさん** · 2013/05/13(月) 04:24:40.60

TEST

**デフォルトの名無しさん** · 2013/05/13(月) 04:45:39.16

test004

**デフォルトの名無しさん** · 2013/07/30(火) NY:AN:NY.AN

＞大阪府三島郡島本町の小学校や中学校は、暴力イジメ学校や。
島本町の学校でいじめ・暴力・脅迫・恐喝などを受け続けて、心も身体も壊されて廃人同様になってしもうた僕が言うんやから、
まちがいないで。精神病院へ行っても、ちっとも良うならへん。教師も校長も、暴力やいじめがあっても見て見ぬフリ。
そればかりか、イジメに加担する教師もおった。誰かがイジメを苦にして自殺しても、「本校にイジメは
なかった」と言うて逃げるんやろうなあ。
島本町の学校の関係者は、僕を捜し出して口封じをするな

＞島本町って町は、暴力といじめの町なんだな

＞「口封じ」なんかしません。どうぞ、気が済むまでお書き込み下さい。

島本町は日本の恥！島本町は日本の迷惑！

**デフォルトの名無しさん** · 2014/02/23(日) 02:55:15.70

>>221
この人の時刻おかしくない？

**デフォルトの名無しさん** · 2014/02/26(水) 07:36:36.74

おかしいね

**デフォルトの名無しさん** · 2014/02/26(水) 08:59:53.51

７－８月ごろのレスがみんなそうなってるのを見た

**デフォルトの名無しさん** · 2014/02/26(水) 22:29:23.27

何か壊れたのかね。

**デフォルトの名無しさん** · 2014/02/26(水) 22:49:01.99

専ブラだとちゃんと見える

**デフォルトの名無しさん** · 2014/02/26(水) 22:49:45.17

違うか、俺は過去ログ持ってるからちゃんと見えてるのか

**デフォルトの名無しさん** · 2014/02/28(金) 22:03:18.81

過去ログ万歳

**デフォルトの名無しさん** · 2014/03/01(土) 21:38:50.04

Perl使って書き込むのってそんなに難しくないような
HTTP通信するモジュール入れて
ブラウザからクッキーとフォームの内容をコピペしてPOST送信するだけだろ

**デフォルトの名無しさん** · 2014/03/01(土) 21:46:06.24

じゃあ逆にしたら？

2chを使ってPerlにHello Worldを書き込む。

2chの力を結集して純正Perlのコードに採用されるってことにしたらいい。
これはちょっと難しいでしょ。

**デフォルトの名無しさん** · 2014/03/01(土) 22:11:46.65

>>229
わざわざそんな面倒なことしなくてもｗｗｗ

**デフォルトの名無しさん** · 2014/03/03(月) 22:06:16.06

PHPのほうが簡単

**デフォルトの名無しさん** · 2014/03/06(木) 06:41:45.14

>>1
馬鹿には無理

**デフォルトの名無しさん** · 2014/03/08(土) 18:45:17.11

Perlはオワコン産廃
初心者はPerlだけはやめとけ

**デフォルトの名無しさん** · 2014/03/08(土) 20:30:01.60

熟練したPerl MongersたちはPerlから離れない
ヤツらが真のPerl使いで、Larryから奥義を授かった伝承者

**デフォルトの名無しさん** · 2014/11/09(日) 14:20:03.84

2chハロワなんて書き込んで何がしたいんだ

**デフォルトの名無しさん** · 2014/12/01(月) 22:38:15.91

スレを荒らしたいんだと

**デフォルトの名無しさん** · 2015/01/20(火) 12:26:21.06

1ヶ月前くらいに作ったスクリプトから書き込めないんだが仕様変わった？

**デフォルトの名無しさん** · 2015/07/30(木) 20:21:58.25

アッー　夏休み

**デフォルトの名無しさん** · 2015/08/06(木) 23:12:26.97

書き込めるかどうかの簡易テストをやったんだけど書けないんだ。
アドバイスくれる人いるかな。
いるならソース書く

**デフォルトの名無しさん** · 2015/08/07(金) 01:18:28.41

httpd立ち上げてlocalhostに対しての入出力は成功したけど、
どうも2ちゃんには弾かれる。
書き込みましたと言うメッセージだけは出るんだが。

**デフォルトの名無しさん** · 2015/08/08(土) 02:52:09.47

予想外の事態だ。
普通のブラウザからの書き込みも弾かれてた。
専ブラじゃないと書き込めねぇ。
こりゃ無理かな

**デフォルトの名無しさん** · 2015/08/08(土) 03:49:01.73

test

**デフォルトの名無しさん** · 2015/08/08(土) 08:23:22.54

test-

**デフォルトの名無しさん** · 2015/08/08(土) 08:50:05.21

test3

**デフォルトの名無しさん** · 2015/10/17(土) 09:09:39.00

いまさらだがUAだろどーせ