NAME

Net::Generatus

SYNOPSYS

  use Net::Generatus;
  #get an interesting yet rude status message
  $status = Net::Generatus::Status({tag => 'insults'});


    

DESCRIPTION

        Pulls a random and potentially witty status message from generatus.com which could be used to update twitter or one of it's clones

METHODS

Status

params tag - (optional) select the status message from message with this tag name - (your name, optional, will be prepended to status message) gender - either M or F (defaults to F) returns: string

EXAMPLE

  #get a insults status message
  $status = Net::Generatus::Status({tag => 'insults'});
 
  $status = Net::Generatus::Status({gender => 'M'});

AUTHOR

Brenda Wallace <shiny@cpan.org>

(based on Net::Twitter::Search and Net::Twitter::Diff)