diff options
Diffstat (limited to 'media-control.raku')
-rw-r--r-- | media-control.raku | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/media-control.raku b/media-control.raku new file mode 100644 index 0000000..38517eb --- /dev/null +++ b/media-control.raku @@ -0,0 +1,30 @@ +#!/usr/bin/env rakudo +use v6.d; +use lib 'inst#local','file#lib'; +use Config::TOML; +use Vlc::Client; +use Lirc::Client; +use App::MediaControl; + +my $config = from-toml(file=>'config.toml'); + +my Vlc::Client $vlc .= new( + password => $config<vlc><password>, + base-uri => $config<vlc><base-uri>, +); + +my Lirc::Client $lirc .= new(); + +my App::MediaControl $app .= new( + port => $config<server><port>, + :$vlc, :$lirc, +); + +$app.start; + +say "listening"; + +react whenever signal(SIGINT) { + $app.stop; + exit; +} |