Исходное сообщение
"tcp hex perl" Отправлено mthawk, 13-Дек-05 12:36
>не могу получить hex данные с сокета, пробую: Из сокета ты получаешь данные. Байты. Складываешь их в файл. Если данные - текст открывая файл для просмотра ты увишишь там текст. если данные - бинарны - ты увидишь там то же, что открывая бинарный файл. если стоит задача в файл складывать hex коды того что получаешь - переменную $data нужно интерпретировать так $data=~s/((.|\n))/sprintf("%.2X",unpack("C",$1)).' '/ge; И будет тебе hex дамп получаемых данных