use AnyEvent::I3;
use JSON::XS;
use List::Util qw(first);
+use Encode qw(decode);
use v5.10;
use utf8;
use open ':encoding(UTF-8)';
die "Only one of --workspace or --output can be specified";
}
+$workspace = decode('utf-8', $workspace);
+$output = decode('utf-8', $output);
+
my $i3 = i3();
if (!$i3->connect->recv) {
die "Could not connect to i3";