contact: "diozaka@gmx.de, code@aibor.de, mk@maero.dk"
description: "print the song you are listening to"
filename: "mpd.pl"
- modified: "2014-08-20 04:23:10"
+ modified: "2014-08-20 21:53:24"
license: "GPLv2"
modules: "IO::Socket"
name: "mpd"
# 0.6: Added some more format directives(time, album) #
# Added support for password authentication #
# 0.7: Added format directives for bitrate and volume #
+# Fixed socket not timing out at specified interval #
#######################################################################
use strict;
Proto => 'tcp',
PeerPort => $MPD{'port'},
PeerAddr => $MPD{'host'},
- timeout => $MPD{'timeout'}
+ Timeout => $MPD{'timeout'}
);
if (not $socket) {