Консольный плеер на perl