The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Net::Twitter::Diff - Twitter Diff

SYNOPSYS

    use Net::Twitter::Diff;

    my $diff = Net::Twitter::Diff->new(  username => '******' , password => '******');
    
    my $res = $diff->diff();

    # get screen_names who you are not following but they are.
    print Dumper $res->{not_following};

    # get screen_names who they are not following but you are.
    print Dumper $res->{not_followed};

    # get screen_names who you are following them and also they follow you. 
    print Dumper $res->{communicated}; 


    my $res2 = $diff->comp_following( 'somebody_twitter_name' );

    # only you are following
    print Dumper $res2->{only_me} ;

    # you are not following but somebody_twitter_name are following
    print Dumper $res2->{not_me} ;

    # both you and somebody_twitter_name are following
    print Dumper $res2->{share} ;


    # If you want , this module use Net::Twitter as base so you can use methods Net::Twitter has.
    $diff->update('My current Status');
    

DESCRIPTION

Handy when you want to know relationshop between your followers and follwoings and when you wnat to compare your following and sombody's.

METHOD

diff

run diff

response hash

not_following

get screen_names who you are not following but they are.

not_followed

get screen_names who they are not following but you are.

communicated

get screen_names who you are following them and also they follow you.

comp_following( $twitter_id )

compaire your following and somebody's

response hash

only_me

only you are following

not_me

you are not following but sombody is following

share

both you and somebody are following.

xfollowing

can get more that 100 followings.

xfollowers

can get more that 100 followers.

SEE ALSO

L:<Net::Twitter>

AUTHOR

Tomohiro Teranishi<tomohiro.teranishi@gmail.com.