i3blocks-music.pl: remove line breaks and punctation-delimited postambles

diff --git a/i3blocks-music.pl b/i3blocks-music.pl
index 9bee37a5e2ae3deb956e30041f705dd8cc16f900..62e3a16ec0d46333dba4a1eeb822a96e15e53607 100755 (executable)
--- a/i3blocks-music.pl
+++ b/i3blocks-music.pl
@@ -27,9 +27,15 @@ my $artist = qx(playerctl $player_arg metadata artist);
 push(@metadata, $artist) if $artist;
 
 my $title = qx(playerctl $player_arg metadata title);
-$title =~ s/(?:[ ][( ][Ff]eat[. ].*)|(?:[( ][Ff]t[. ].*)//;
+$title =~ s/(\s|\s\()[Ff]([et]at[. ].*|t.*)//;
+$title =~ s/(\s\(.+\) *|\s-\s.+)//;
+$title =~ s/&/&/;
 push(@metadata, $title) if $title;
 
+for (@metadata){
+  s/\n//;
+}
+
 # Print stuff
 print(join(" - ", @metadata)) if @metadata;
 print("</span>");