NAME

DCOP::Amarok::Player - Perl extension to speak to an amaroK player object via system's DCOP.

SYNOPSIS

  use DCOP::Amarok::Player;
  $player = DCOP::Amarok::Player->new();

  $player->playPause();
  print $player->getRandom();

DESCRIPTION

        This module is a quick hack to get an interface between perl and Kde's DCOP,
        since Kde3.4's perl bindings are disabled. This suite talks to 'dcop'.
        DCOP::Amarok::Player talks directly to the player object of amaroK.

EXPORT

None by default.

METHODS

new()

Constructor. No arguments needed. If the program will be run remotely, the need for 'user => "myusername"' arises.

album()

        Returns the album name of currently playing song.

artist()

        Returns the artist performing currently playing song.

title()

        Returns the title of currently playing song.

playPause()

stop()

next()

prev()

getRandom()

        Returns the status of the Shuffle play mode.

toggleRandom()

        Toggles the Shuffle play mode. Returns the new state.

mute()

volUp()

volDn()

vol()

        Returns the volume level.

status()

        Returns the playing status of amaroK. 
        0: Stopped, 1: Paused, 2: Playing

track()

        Returns the track number of the song that is currently being played.

totaltime()

        Returns in MM:SS the total playing time of the song that is currently being played.

elapsed()

   Returns in MM:SS the elapsed time of the song that is currently being played.

totaltimesecs()

   Returns in seconds the total playing time of the song that is currently being played.

elapsedsecs()

        Returns in seconds the elapsed time of the song that is currently being played.

fwd()

        Fast forwards 5 seconds the song.

rew()

        Rewinds 5 seconds the song.

lyrics()

        Returns the lyrics of the song that is currently being played.

AUTHOR

Juan C. Muller, <jcmuller@gmail.com>

COPYRIGHT AND LICENSE

Copyright 2005 by Juan C. Muller

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