vlc.raku


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

#!/usr/bin/env rakudo 
use v6.d;
use lib 'inst#local','file#lib';
use Vlc::Client;
use Vlc::App;
 
my Vlc::Client $vlc .= new(:password<ginopino>,:base-uri<http://192.168.1.111:8080/requests/>);
 
my Vlc::App $app .= new(:port(8080), :$vlc);
 
$app.start;
 
react whenever signal(SIGINT) {
    $app.stop;
    exit;
}