#!/usr/bin/perl

use strict;
use warnings;
use utf8::all;

use App::MPD::Feeder;
use Log::Any qw($log);
use Log::Any::Adapter Stderr => log_level => 'error';

my $feeder = App::MPD::Feeder->new();

if (@ARGV) {
    require App::MPD::Feeder::Command;
    bless $feeder, 'App::MPD::Feeder::Command';

    exit $feeder->run(@ARGV);
}

$feeder->run_loop;