Vc fala desse exemplo:
# in the default state, expect some header bytes
$handle->on_read (sub {
# some data is here, now queue the length-header-read (4 octets)
shift->unshift_read (chunk => 4, sub {
# header arrived, decode
my $len = unpack "N", $_[1];
# now read t
Epa, 4 bytes para armazenar o tamanho da mensagem?! Isso sugere que o
protocolo pressupõe a leitura em chunks. O jeito eficiente seria ler em
blocos de, digamos, 4KB, e tratar o 1o bloco da forma diferenciada. Isso é,
lê o primeiro bloco, pega o tamanho da mensagem e o status, e armazena no
buffer
2013/4/30 Tiago Peczenyj
> Seguinte: tenho X bytes como
>
> $x="12345"
>
> E quero pegar o primeiro e o resto:
>
> ($a,$b) = magica $x;
>
> $a = 1
> $b = 2345
>
> Comofas?
>
Usando o "split" com 3 argumentos:
pirl @> $x = '12345'
12345
pirl @> ($first, $rest) = split('',$x,2)
(1, 2345)
>
Sem problemas.
There is more than..
Em 01/05/2013 10:57, "André Walker" escreveu:
> Ops, desculpe, não tinha lido a thread inteira!
>
> On Wed, May 01, 2013 at 10:53:31AM -0300, André Walker wrote:
>
>> On Tue, Apr 30, 2013 at 07:37:41PM -0300, Tiago Peczenyj wrote:
>>
>>> Seguinte: tenho X byte
Ops, desculpe, não tinha lido a thread inteira!
On Wed, May 01, 2013 at 10:53:31AM -0300, André Walker wrote:
On Tue, Apr 30, 2013 at 07:37:41PM -0300, Tiago Peczenyj wrote:
Seguinte: tenho X bytes como
$x="12345"
E quero pegar o primeiro e o resto:
($a,$b) = magica $x;
$a = 1
$b = 2345
Co
On Tue, Apr 30, 2013 at 07:37:41PM -0300, Tiago Peczenyj wrote:
Seguinte: tenho X bytes como
$x="12345"
E quero pegar o primeiro e o resto:
($a,$b) = magica $x;
$a = 1
$b = 2345
Comofas?
Se eu entendi bem o que você tá perguntando:
sub magica {
substr($_[0], 0, 1), substr($_[0
> Bom, deixem me explicar o que eu quero fazer: o Riak [...]
>
Já desconfiava disso =D
>
>
> 0x14,0,0,0,0xa,0xa,0x11,0xa,0xf,0x7b,0x20,0x66,0x6f,0x6f,0x20,0x3d,0x3e,0x20,0x27,0x62,0x61,0x72,0x27,0x7d
>
> essa tralha toda representa uma resposta de um "GET", basicamente temos
>
> 4 bytes para o t
