added the start of a perl mpd client