new( $myspace )

Example

use WWW::Myspace; use WWW::Myspace::Comment;

my $myspace = new WWW::Myspace;

my $comment = WWW::Myspace::Comment->new( $myspace );

message

friend_ids

 $message->friend_ids( 12345, 12347, 123456 ); # Set the list of friends
 
 @friend_ids = $message->friend_ids; # Retreive the list of friends

exclusions

Example

( @exluded_friends ) = $comment->exclusions;

commented

cache_file

For convenience this method returns the value in all cases, so you can do this:

$cache_file = $commented->cache_file( "/path/to/file" );

exclusions_file

max_count

Call max_count( 0 ) to disable counting. This is good if you can handle CAPTCHA responses and you want to stop only when you get a CAPTCHA request (i.e. if you're running from a CGI script that can pass them back to a user).

html( [1] [0] )

Call html(1) to display HTML tags (currently just "BR" tags). Call html(0) to display plain text.

Text output (html = 0) is enabled by default.

Example

$comment->html( 1 );

delay_time

noisy( [1] [0] )

If "noisy" is off, the post_comments method will run silently until it hits a CAPTCHA response or until it hits its max_count.

set_noisy is off (0) by default.

set_noisy

interactive

myspace

post_comments( [ $message ], [ @friend_ids ] )

post_comments will automatically skip all friendIDs in the "exclusions" list (see the exclusions method above). It will also scan each profile page before posting, and if a link to our profile exists on the page, it will not post. It will post until it has posted "max_count" successful posts, or until it receives a CAPTCHA request ("please enter the characters in the image above").

post_comments returns a status string indicating why it stopped: CAPTCHA if a CAPTCHA image code was requested. COUNTER if it posted max_count comments and stopped. DONE if it posted everywhere it could.

Example

The following script will send the message "Hi!" to all of your friends, and then reset the exlusions file.

 use WWW::Myspace;
 use WWW::Myspace::Comment;

 my $myspace = new WWW::Myspace;

 my $comment = WWW::Myspace::Comment->new( $myspace );
 my $response = "";
 
 # We're sending a message, doesn't matter if we've posted before
 $comment->ignore_duplicates(1);

 # Post our comment until we're done - may take several days if we're
 # popular.
 while ( 1 ) {
        $response = $comment->post_comments( "Hi!" );
        last if ( $response eq "DONE" );
        
        if ( $response eq "CAPTCHA" ) {
        
                #[ do nothing, or get the form, post it yourself, and continue ]
                #( Hint: the page is in $myspace->{current_page}->content )
        }

        # (If response is CAPTCHA or COUNTER, we wait then continue
        # until we're done). Note that you can probably sleep for 12 hours
        # instead of 24.
        sleep 24*60*60; #Sleep for a day, or run using cron
 }

 # We're done sending this message - reset the exclusions file
 # completely.
 $comment->reset_exclusions('all');

Note that because of the log post_comments keeps, this script could be interrupted and restarted without re-posting anyone.

Example 2

This script will make sure you've always got a comment on your friend's pages.

 use WWW::Myspace;
 use WWW::Myspace::Comment;

 my $myspace = new WWW::Myspace;

 my $comment = WWW::Myspace::Comment->new( $myspace );
 my $response = "";
 
 # Post our comment until we're done - may take several days if we're
 # popular.
 while ( 1 ) {
        $response = $comment->post_comments( "Hi!" );
        
        if ( $response eq "DONE" ) {
                # We're done sending this message - reset the exclusions 
                # file, except for people who approve their comment posts.
                # This causes us to start over, posting only if we don't
                # already have a comment on their page (i.e. if it's been
                # pushed off).
                $comment->reset_exclusions;
                last;
        }
                
        # (If response is CAPTCHA or COUNTER, we wait then continue
        # until we're done). Note that you can probably sleep for 12 hours
        # instead of 24.
        sleep 24*60*60; #Sleep for a day, or run using cron
 }

 # (Also see post_all below, which implements this loop).

post_all

Returns the response code it gets from post_comments, which will always be "DONE" unless delay_time is set to 0, in which case it could be any of the codes returned by post_comments.

EXAMPLE use WWW::Myspace; use WWW::Myspace::Comment;

 my $comment = new WWW::Myspace;
 my $comment = new WWW::Myspace::Comment( $myspace );

 # Send the message
 $comment->message("This is a great message wraught with meaning.");
 $comment->friend_ids( $myspace->get_friends );
 $comment->post_all;

 # Or

 # Send the message
 $comment->post_all( "This is a great message", $myspace->get_friends );

ignore_duplicates( [ 1 | 0 ] )

$comment->ignore_duplicates(1)

before calling post_comments, it will post without checking the page for previous comments. It will still check the exclusions list however.

Call $comment->ignore_duplicates(0) to return to checking for comments before posting (this is the default).

Use this option if you're posting a new, specific comment (like "Merry Christmas", "Check out my new album") and you don't care if there's already another comment by you on people's pages.

reset_exclusions

reset_exclusions( 'all' )

The reason for leaving friends with "PA" status is probably best described with an example. Say you have 700 friends. You want to hit each of their pages with "Just stopping by to say hi!". So you set your comment script to run every day at 11am until you get a return status of "DONE" (with 700 friends that'd take 14 days). After that you want to keep running the script, posting only to pages that your comment has dropped off of. Conveniently, post_comments will do that for you by default. So you call reset_exclusions. If someone requires comments to be approved, your comment might not appear on their page (yet). If you keep the script running daily, resetting exlusions (because it'd hit "DONE" every day), you'd spam that poor person every day. So, by default, reset_exclusions will clear everything EXCEPT friends that approve comments.

If you want to override that behavior, call reset_exclusions( 'all' ). You'd use this if, for example, you were sending a specific comment to all of your friends (i.e. "Merry Christmas" or "Check out my new album!"). It doesn't matter if you then send another comment. In this case, you probably want to call ignore_duplicates(1) also.