NAME

Net::Rovio - A Perl module for Rovio manipulation

SYNOPSIS

  use Net::Rovio;
  my $rovio = Net::Rovio->new('my-rovio.ath.cx', 'admin', 'password');
  $rovio->light('on');
  $rovio->send_photo();
  sleep 1;
  $rovio->camera_head('mid');
  $rovio->send_photo();
  sleep 1;
  $rovio->camera_head('up');
  $rovio->send_photo();
  sleep 1;
  $rovio->camera_head('mid');
  sleep 1;
  $rovio->camera_head('down');
  sleep 1;
  $rovio->light('off');
  $rovio->dock();
  

DESCRIPTION

Use Net::Rovio to control your Rovio robot from Perl. Uses basic Rovio API commands.

FUNCTIONS

• $object = Net::Rovio->new('hostname'[, 'username', 'password'])

  Opens the Rovio for communication.

• $object->send('file'[, 'GET data'])

  Requests 'file' with 'GET data' from your robot.

• $object->camera_head('up'|'down'|'mid')

  Moves the camera head to the up, down, or middle position.

• $object->light('on'|'off')

  Turns the headlight on/off.

• $object->dock()

  Sends the Rovio to its charging base.

• $object->halt()

  Sends the Rovio a halt message.

• $object->send_photo()

  Send a snapshot of the current camera image to the email address specified in the Rovio settings.

DEPENDENCIES

LWP::Simple

TODO

Motions

  $object->move('left')

AUTHOR

Ivan Greene (ivantis@ivantis.net)

SEE ALSO

LWP::Simple WWW::Mechanize