Perl script for show current playing track from last.fm