my $title = qx(playerctl $player_arg metadata title);
$title =~ s/(\s|\s\()[Ff]([et]at[. ].*|t.*)//;
-$title =~ s/&/&/;
+$title =~ s/((\s(\(|\[).+(\)|\]).*)|(\s-\s.+))//;
push(@metadata, $title) if $title;
+for (@metadata){
+ s/\n//; # remove newlines
+ s/&/&/; # fix ampersand rendering for i3bar
+}
+
# Print stuff
print(join(" - ", @metadata)) if @metadata;
print("</span>");