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

1 名前：デフォルトの名無しさん [2007/07/15(日) 16:16:50 ] 俺、がんばる。みてて。 86 名前：デフォルトの名無しさん mailto:sage [2008/03/19(水) 02:51:43 ] ActivePerl-5.10.0.1002-MSWin32-x86-283697.msi を保存して ダブルクイックすると 『インストール　パッケージを開くことができませんでした。アプリケーションベンダに問い合わせ、このパッケージが有効なWindowｓインストーラパッケージであることを確認してください。』　　と出るのですが 何が問題あるのでしょうか 87 名前：うっかり八兵衛 mailto:sage [2008/03/19(水) 06:04:17 ] >>86　 インストーラパッケージが壊れていまし。 保存のインスト不良でした 早とちり で、しまったシマッタ！島倉千恵子！ (;^_^A フキフキ 88 名前：デフォルトの名無しさん mailto:sage [2008/03/19(水) 07:27:01 ] とりあえず乙 89 名前：デフォルトの名無しさん mailto:sage [2008/03/29(土) 00:38:42 ] >>86 亀レスだがそれはファイルが壊れてるだけ。 俺もこの前WIN再インスコしたときになった。 activeperlのある鯖が不安定っぽいからリジューム機能のついてるツール使ってダウソしたほうがいいよ。 90 名前：デフォルトの名無しさん [2008/05/14(水) 13:50:09 ] test 91 名前：デフォルトの名無しさん [2008/05/16(金) 17:59:54 ] クライアントがクッキーを受け入れているかどうかってどうやって判断しているんでしょうか？ 92 名前：デフォルトの名無しさん [2008/05/16(金) 20:42:21 ] 食わせたクッキーを吐き出させればいいよ。 93 名前：デフォルトの名無しさん [2008/08/22(金) 22:09:35 ] test 94 名前：デフォルトの名無しさん mailto:sage [2008/08/22(金) 22:10:36 ] wget --referer=pc11.2ch.net --save-cookie=c --load-cookie=c --post-data='hana=mogera&bbs=tech&key=1184483810&time=1&mail=&FROM=&MESSAGE=test' pc11.2ch.net/test/bbs.cgi 95 名前：デフォルトの名無しさん [2008/08/31(日) 11:33:21 ] #!/usr/bin/perl use warnings; use strict; use WWW::Mechanize; my $url = 'pc11.2ch.net/test/read.cgi/tech/1184483810/'; my $mail = 'sage'; my $text = 'Hellow World; my $mech = WWW::Mechanize->new; $mech->agent_alias('Linux Mozilla'); $mech->get($url); $mech->submit_form( form_number => 2, fields=>{ FROM => '', mail => $mail, MESSAGE => $text, }, ); print $mech->content; $mech->submit; print $mech->content; なんで、これでじゃかきこめないわけ? 96 名前：デフォルトの名無しさん mailto:sage [2008/09/07(日) 15:18:17 ] hello world 97 名前：デフォルトの名無しさん [2008/09/15(月) 20:22:15 ] ゆきさん、好きだ。 98 名前：デフォルトの名無しさん [2008/10/10(金) 18:19:28 ] そんぽぷへるめ 99 名前：デフォルトの名無しさん [2008/12/07(日) 20:49:28 ] pc11.2ch.net/test/read.cgi/software/1118219419/850 より use utf8; binmode STDOUT => ":encoding(cp932)"; binmode STDIN => ":encoding(cp932)"; use open IO => ":encoding(cp932)"; use Win32::IEAutomation; use Encode; $ie = Win32::IEAutomation->new( visible => 1, maximize => 0); $ie->gotoURL('pc11.2ch.net/test/read.cgi/software/1118219419/l1n'); $ie->getTextBox('name:', 'FROM')->SetValue(encode('cp932', "名無しさん＠お腹すいた") ); $ie->getTextBox('name:', 'mail')->SetValue('sage'); $ie->getTextArea('name:', 'MESSAGE')->SetValue(encode('cp932', ">>845\nソースきぼ〜ん") ) ; $ie->getButton('name:', 'submit')->Click(1) ; sleep(10); $ie->getButton('name:', 'submit')->Click(1) ; # 初回投稿時の確認ウィンドウ用

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef