หน้าแรก>การเขียนโปรแกรมที่เกี่ยวข้อง>ซอร์สโค้ดอื่น ๆ
ดาวน์โหลด

ชื่อ

สิ่งที่เป็นอย่างดี :: ฟอรัม

เรื่องย่อ 

 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' );

คำอธิบาย

ขูดและโพสต์ไปยังฟอรัมฟอรัม Somethingawful.com

ดู /ตัวอย่างโฟลเดอร์

การติดตั้ง 

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

วัตถุ

index_scraper

เว็บ :: มีดโกนมีดโกนสำหรับหน้าดัชนีของฟอรัมขูด

Forum_scraper

เว็บ :: มีดโกนสำหรับการขูดฟอรัมเฉพาะ

Thread_scraper

เว็บ :: มีดโกนสำหรับการขูดเธรดเฉพาะ

base_url

มี URL ของดัชนีฟอรัม อนุญาตให้ใช้ที่อยู่ IP หาก DNS ไม่สามารถแก้ไขได้

เมค

www :: mechanize วัตถุที่ใช้ภายในเพื่อนำทางหน้าเว็บ

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] )

ส่งคืน hashref repsenting เธรดที่ถูกคัดลอกมาจากหน้าเว็บที่ให้มาของรหัสฟอรัมที่ให้มา

fetch_posts 

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

ส่งคืน Hashref repsenting โพสต์ที่ถูกคัดลอกมาจากหน้าเว็บที่ให้มาของรหัสเธรดที่ให้มา

ผู้เขียน

ugexe

ใบอนุญาต

ไลบรารีนี้เป็นซอฟต์แวร์ฟรีคุณสามารถแจกจ่ายใหม่และ/หรือแก้ไขภายใต้ข้อกำหนดเดียวกันกับ Perl เอง

ขยาย
ข้อมูลเพิ่มเติม
แอปที่เกี่ยวข้อง
แนะนำสำหรับคุณ
ข้อมูลที่เกี่ยวข้อง ทั้งหมด