GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages


Manual Reference Pages  -  WWW::MIXI::COOKBOOK (3)

.ds Aq ’

NAME

WWW::Mixi::Cookbook - WWW::MixiXXXXXXX

CONTENTS

DESCRIPTION

XXXXXXXXXXWWW::MixiXXXXXXXXXXXXXXXXXXXXXXXXXXXX

mixiXXXXXXXX

WWW::MixiXXXXXXXXXXXXXXloginXXXXXXXXXX1XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXmixiXXXXXXXXXXXXXXX

    XXXX

mixiXXXXXXXXloginXXXXXXXXXXXXX XXXXXXXXLWP::UserAgentXXXXXXRequestXXXXXgetXpostXXXXXXmixiXXXXXXmixiXXXXXXXXXXXXXXXXXXXXXXXXXXXX



 use WWW::Mixi;
 use HTTP::Request::Common;

 my $mixi = WWW::Mixi->new(me@mixi.user, mixi_password);

 print "XXXXXXXX\n";
 my $response = $mixi->login;



    XXXXXXXXXXXXX

mixiXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXget_new_friend_diaryXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXX



 {
        subject => mixiXXX,
        link => http://mixi.jp/list_item_review.pl?reviewer_id=xxxx&item_id=xxxxx,
        name => XXXX,
        time => 2004/08/18 13:18
 }



XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX



 use WWW::Mixi;

 my $mixi = WWW::Mixi->new(me@mixi.user, mixi_password);

 print "XXXXXXXX\n";
 my $response = $mixi->login;

 print "XXXXXXXXXXXXXXXXX\n";
 my =item get_new_friend_diary;
 print "XXXXXXXXXXXXXXXXX\n";
 foreach my $item (@items) {
        my $subject = $item->{subject};
        my $link = $item->{link};
        my $name = $item->{name};
        my $time = $item->{time};
        print "X $subject\n[XX] $time\n[XX] $name\n[Link] $link\n\n";
 }



XXXXXXXXXXXXXXXXmixiXXXXXXXEUCXXXXXXXXX WindowsXXXXXXXXXXXXXXXXXXXXXXXSJISXXXXXXXXXXXXXXXXXXXXXJcodeXXXXXXXXXXXXXXXXXXXX

    XXXXXXXXXXXXX

XXXXXXXXXXXXget_new_friend_diaryXXXXXXXXXXXXXXXXXXXXXXXXX XXX0.21XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXparse_XXXXXXXXXXXXXXXXXget_XXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXX

XXXXXXXXXXXXXXget_new_friend_diaryXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXget_new_friend_diaryXXXXXXXXXXXXXXXXXXXXXXXXX
get_information XXXXXXXXXXXXXXXXXXXXXXXXXXXX
get_list_comment XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
get_list_message XXXXXXXXXXXXXXXXXXXXXXX
get_new_bbs XXXXXXXXXXXXXXXXXXX
get_new_comment XXXXXXXXXXXXXXXXX
get_new_friend_diary XXXXXXXXXXXXXXXXX
get_new_review XXXXXXXXXXXXXXXXXXX
get_show_log XXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXget_main_menuXXXXXXXXXget_bannerXXXXXXXXXXXXXget_tool_barX3XXXXXXURLXXXXXXXX XXXXXXXXXXXXXXXXXXX URLXhome.plXXXXXXXXXXXXXXXXXXXXXX



 my =item get_main_menu("home.pl");



URLXXXXXXXXXXXXXXXXXXXXXXXgetXXXpostXXXXXXXXXXXXXXXXXX
get_main_menu XXXXXXXXXXXXXXXXXXXXX
get_banner XXXXXXXXXX
get_tool_bar XXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXget_show_log_countXXXXXXXXXXXX XXXXget_self_idXXXXIDXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX



 my $count = $mixi->get_show_log_count;
 my $id = $mixi->get_self_id;



get_show_log_count XXXXXXXXXXX
get_self_id XXXIDXXXXXXX

LWP::UserAgentXXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXLWP::UserAgentXXXXXXXXXXXXXXX

XXXXWWW::MixiXXXXXXXXXLWP::RobotUAXXXXXXXXXXXXXXXLWP::UserAgentXXX XXXXXXXXLWPXXUserAgentXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

    XXXX

LWP::UserAgentXXXXXXXXXXXXXXXXXXXXXXXloginXXXXXXXXXXXXXXXXXXX

LWP::UserAgentXXXXXXXXXXXXXPOSTXHTTP::RequestXXXXXXXXXXXCookieXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXCookieXXXXXXIDXXXXXXXXXXXXXXXLWP::UserAgentXXXXXXrequestXsimple_requestXXXXXXXXXXXXXXXXXXX

XXXXXXXXXXXXXXHTMLXXXXXXXXXXXXXXXXXXX



 use WWW::Mixi;
 use HTTP::Request::Common;

 my $mixi = WWW::Mixi->new(me@mixi.user, mixi_password);

 print "XXXXXXXX\n";
 my $response = $mixi->login;

 print "XXXXXXXXXX\n";
 $request = &HTTP::Request::Common::GET(http://mixi.jp/home.pl);
 $response = $mixi->request($request);
 print $response->content;



    getXXXX

LWP::UserAgentXXXXXXXXXXXXXXXXX(1)HTTP::RequestXXXXXXXXXX(2)requestXXXXXXXXXXXXXXXXXXXXXX WWW::MixiXXXXXXXXXXXXgetXpostXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXX



 use WWW::Mixi;
 use HTTP::Request::Common;

 (X)

 print "XXXXXXXXXX\n";
 $request = &HTTP::Request::Common::GET(http://mixi.jp/home.pl);
 $response = $mixi->request($request);
 print $response->content;



getXXXXXHTTP::Request::CommonXXXXXXXXXXXXXXXXXXXXXXXXXXURLXXXXXXXXXXX XXXURLX’http://’XXXXXXXURLXXXXXXXXXXXXXXXXXXXXXXXXX’.pl’XXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXX



 use WWW::Mixi;

 (X)

 print "XXXXXXXXXX\n";
 $response = $mixi->get(home.pl);
 print $response->content;



    postXXXX

XXXGETXXXXXXXXXXXXXXXXXXXXWWW::MixiXXgetXXXXXXXXXXXXXXXXXX

XXXPOSTXXXXXXXXXXXXXXXXXpostXXXXXXXXXXXXXXXXXXXXXX postXXXURLXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXX



 use WWW::Mixi;

 my %diary = (
        submit      => confirm,                  # XXXXX:mainXXX:confirmXXX:cancel
        diary_title => WWW::MixiXXXXXX,
        diary_body  => "WWW::MixiXXXXXXXXXXXXXXXXX\nPOSTXXXXXXXXXX",
        photo1      => ,
        photo2      => ,
        photo3      => ,
 );

 my $mixi = WWW::Mixi->new(me@mixi.user, mixi_password);

 print "XXXXXXXX\n";
 my ($result, $response) = $mixi->login;

 print "XXXXXXXXX\n";
 $response = $mixi->post(add_diary.pl, %diary);



XXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXX

    XXXXXXX

postXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXphoto1XXphoto2XXphoto3XX3XXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX



 use WWW::Mixi;

 my %diary = (
        submit      => main,                  # XXXXX:mainXXX:confirmXXX:cancel
        diary_title => WWW::MixiXXXXXX,
        diary_body  => "WWW::MixiXXXXXXXXXXXXXXXXX\nPOSTXXXXXXXXXX",
        photo1      => [c:\My Documents\photos\walrus.png],
        photo2      => ,
        photo3      => ,
 );

 my $mixi = WWW::Mixi->new(me@mixi.user, mixi_password);

 print "XXXXXXXX\n";
 my ($result, $response) = $mixi->login;

 print "XXXXXXXXX\n";
 $response = $mixi->post(add_diary.pl, %diary);



    XXXXXXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX WWW::MixiXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXmixiXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXparse_main_menuXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXX



 {
        subject => XXX,
        link => http://mixi.jp/home.pl
 }



XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX



 use WWW::Mixi;

 my $mixi = WWW::Mixi->new(me@mixi.user, mixi_password);
 print "XXXXXXXX\n";
 my $response = $mixi->login;
 print "XXXXXXXXXX\n";
 $response = $mixi->get(home.pl);

 print "XXXXXXXXXXXXXX\n";
 my =item parse_main_menu($response);
 foreach my $item (@items) {
        my $subject = $item->{subject};
        my $link = $item->{link};
        print "$subject -> $link\n";
 }



XXX$responseXXXXXXXXXXXXXXgetXXXpostXXXXXXXXXXXXXXXXXXXrequestXsimple_requestXXXXXXXX XXXXXXXXXXXXXXXXXgetXXXXXXXXXXXXXXXXX$responseXXXXXXXXXXXXXX



 my =item parse_main_menu();



    XXXXXXXXXX

XXXXXXXXXparse_main_methodXXXXXXXXXXXXXXXXXXXXXXXXXX

XXXXXXXXXXX$responseXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX $responseXXXXXXXXXXXXXXXXXXXgetXXXpostXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

XXX0.21XXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_main_menu XXXXXXXXXXXXXXXXXXXXX
parse_banner XXXXXXXXXXXXXXXXXXXXXXXXXX
parse_tool_bar XXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_information XXXXhome.plXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_community_id XXXXXXXXXXview_community.plXXXXXXXXXlist_bbs.plXXXXXXXview_bbs.plXXXXXXXXXXXXXXX
parse_list_bbs XXXXXXXlist_bbs.plXXXXXXXXXXXXX
parse_list_bbs_next XXXXXXXlist_bbs.plXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_list_bbs_previous XXXXXXXlist_bbs.plXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_list_bookmark XXXXXXlist_bookmark.plXXXXXXXX
parse_calendar XXXXXXcalendar.plXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_calendar_term XXXXXXcalendar.plXXXXXXXXXXXXXXXXXXXXX
parse_calendar_next XXXXXXcalendar.plXXXXXXXXXXXXXXXXXXX
parse_calendar_previous XXXXXXcalendar.plXXXXXXXXXXXXXXXXXXX
parse_list_comment XXXXXXXXlist_comment.plXXXXXXXXXXXXXXXXXXXXXXXXX
parse_list_community XXXXXXXXXlist_community.plXXXXXXXXXXXXXXXXXXXX
parse_list_community_next XXXXXXXXXlist_community.plXXXXXXXXXXXXXXXXXXXXX
parse_list_community_previous XXXXXXXXXlist_community.plXXXXXXXXXXXXXXXXXXXXX
parse_list_diary XXXlist_diary.plXXXXXXXXXXXXX
parse_list_diary_next XXXlist_diary.plXXXXXxxXXXXXXXXXXXXXX
parse_list_diary_previous XXXlist_diary.plXXXXXxxXXXXXXXXXXXXXX
parse_list_friend XXXXXXXXlist_friend.plXXXXXXXXXXXXXX
parse_list_friend_next XXXXXXXXlist_friend.plXXXXXXXXXXXXXXXXXXXXX
parse_list_friend_previous XXXXXXXXlist_friend.plXXXXXXXXXXXXXXXXXXXXX
parse_list_member XXXXXXXlist_member.plXXXXXXXXXXXXX
parse_list_member_next XXXXXXXlist_member.plXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_list_member_previous XXXXXXXlist_member.plXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_list_message XXXXXXlist_message.plXXXXXXXXXXXXXXXXXXX
parse_list_request XXXXXXXlist_request.plXXXXXXXXXXXXX
parse_new_bbs XXXXXXXXXXXXXnew_bbs.plXXXXXXXX
parse_new_bbs_next XXXXXXXXXXXXXnew_bbs.plXXXXXXXXXXXXXXXXXXXX
parse_new_bbs_previous XXXXXXXXXXXXXnew_bbs.plXXXXXXXXXXXXXXXXXXXX
parse_new_comment XXXXXXXXXXXnew_comment.plXXXXXXXX
parse_new_friend_diary XXXXXXXXXXXnew_friend_diary.plXXXXXXXX
parse_new_friend_diary_next XXXXXXXXXXXnew_friend_diary.plXXXXXXXXXXXXXXXXXXXXX
parse_new_friend_diary_previous XXXXXXXXXXXnew_friend_diary.plXXXXXXXXXXXXXXXXXXXXX
parse_new_review XXXXXXXXXXXXXnew_review.plXXXXXXXX
parse_release_info XXXXXXXXXXXXrelease_info.plXXXXXXXX
parse_show_log XXXXXshow_log.plXXXXXXXX
parse_show_log_count XXXXXshow_log.plXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_view_bbs XXXXXview_bbs.plXXXXXXXXXXXXX
parse_add_diary_preview XXXXXXXXXXXadd_diary.plXXXXXXXXXXXXXXXXXXXXXXXXXXX
parse_self_id XXXXXXXXXlist_review.plXXXXXXXXXIDXXXXXX XXXXXXXXXXXIDXXXXXXXXXXXXXXXXXXXXXXX

SEE ALSO

WWW::Mixi, LWP::UserAgent, WWW::RobotUA, HTTP::Request::Common

COPYRIGHT

Copyright 2004-2004 TSUKAMOTO Makio.

This text is free document; you can redistribute it and/or modify it under the same terms as Perl itself.

Search for    or go to Top of page |  Section 3 |  Main Index


perl v5.20.3 WWW::MIXI::COOKBOOK (3) 2005-09-11

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with manServer 1.07.