print $socket "icy-metaint:8192\r\n";