view release on metacpan or  search on metacpan

lib/App/Scrobble.pm  view on Meta::CPAN

# ABSTRACT: Command line scrobbling app
package App::Scrobble;

use Moose;
use namespace::autoclean;
with 'MooseX::Getopt::Dashes',
     'MooseX::SimpleConfig';

our $VERSION = '0.03'; # VERSION

use Module::PluginFinder;
use Net::LastFM::Submission;
use File::HomeDir;
use Data::Dump qw( pp );

has 'username' => (
    is => 'rw',
    isa => 'Str',
    required => 1,
    documentation => 'Your last.fm username',
);

has 'password' => (
    is => 'rw',
    isa => 'Str',
    required => 1,
    documentation => 'Your last.fm password',
);

has 'url' => (
    is => 'rw',
    isa => 'Str',
    required => 1,
    documentation => 'The URL of the thing you\'d like to scrobble',
);

has '+configfile' => (
    is => 'rw',
    default => sub {
        return File::HomeDir->my_home . "/.scrobble.yaml";
    },
);

has 'dry_run' => (
    is => 'rw',
    isa => 'Bool',
    default => 0,
    documentation => 'Show what would have been scrobbled but doesn\'t actually scrobble',
);

has 'verbose' => (
    is => 'rw',
    isa => 'Bool',
    default => 0,
    documentation => 'Prints out information about progress',
);

has 'debug' => (
    is => 'rw',
    isa => 'Bool',
    default => 0,
    documentation => 'Print out extra diagnostics, useful if things do not seem to be working',
);

has 'finder' => (