Здравствуйте, elar, Вы писали:

E>$socket = IO::Socket::INET->new(PeerAddr => "mysite:80");
E>($uploadserver) = <$socket> =~ /\r\n\r\n(\d+)/;

E>Если возможно переведите на C#. Или объясните, что означает 2-я строка. Заранее благодарен.
E>(P.S. perl-недружелюбный язык. Особенно,когда его не знаешь. )

ЕМНИП разбираем вторую строку:
<$socket> — читаем из сокета все что там есть
=~ — натравляем шаблон на данные
<$socket> =~ /\r\n\r\n(\d+)/;
прочитанное разбиваем по шаблону — ищем двойной перевод строки за которым следуют цифры (они нам и нужны)
результат присваиваем ($uploadserver). А в скобках — чтобы присвоился не массив а первое значение из массива

Все очевидно