SomethingAwful Forums

名前

何かが覚えています::フォーラム

概要

 use Modern::Perl;
use SomethingAwful::Forums;
use Data::Dumper;

my $SA = SomethingAwful::Forums->new;

$SA->login(
    'username' => 'something',
    'password' => 'awful',
);

my $scraped_thread = $SA->fetch_posts( 
    thread_id => 3343753, 
    pages     => 1, 
);

# view the data structure
say Dumper( $scraped_thread ); 

$SA->reply_to_thread( thread_id => 3343753, 'gas' );

説明

forums.somethingawful.comフォーラムにこすり落として投稿してください。

フォルダーを参照 /例。

インストール

 # install everything needed by the SomethingAwful::Forums module + examples
cpanm --with-recommends git://github.com/ugexe/SomethingAwful--Forums.git

オブジェクト

index_scraper

Web ::スクレイパーフォーラムのインデックスページのスクレーパースクレーパー。

forum_scraper

Web ::特定のフォーラムをスクレイピングするためのスクレーパー。

thread_scraper

Web ::特定のスレッドをスクレイピングするためのスクレーパー。

base_url

フォーラムインデックスのURLが含まれています。 DNSが解決に失敗した場合、IPアドレスを使用できます。

メカ

www :: Webページをナビゲートするために内部で使用されるオブジェクトを機械化します。

logged_in

正常にログインした場合に1を返します。

方法

ログイン

 $SA->login( username => $username, password => $password )

渡された資格情報を使用してフォーラムにログインします。

REPLY_TO_THREAD

 $SA->reply_to_thread( thread_id => $thread_id, body => $body )

特定のスレッドに返信します

REPLY_TO_POST

 $SA->reply_to_post( post_id => $post_id, body => $body )

特定の投稿に返信します。

fetch_forums

 $SA->fetch_forums

スクレイプされたフォーラムインデックスを表すハッシュレフを返します。

fetch_threads

 $SA->fetch_threads( forum_id => $forum_id, pages => [1,2] )

付属のフォーラムIDの付属ページから削られたスレッドを再送信するハッシュレフを返します。

fetch_posts

 $SA->fetch_posts( thread_id => $forum_id, pages => [1,2] )

提供されたスレッドIDの付属ページから削られた投稿を再送信するハッシュレフを返します。

著者

ugexe

ライセンス

このライブラリはフリーソフトウェアであり、Perl自体と同じ条件で再配布したり、変更したりできます。