[eside-ghost] Re: ACII a hex en perl

[Arkaitz]

Aupa,
Solucionado de parte de los chicos de #perl en freenode.org y consejo de legalo.

@splittext = $ARGV[0] =~ /../g;

Consejo de legalo:
<tybalt89> If you know what you want, use regex, if you know what you
don't want, use split.

Agures!

On 12/17/06, Arkaitz <arkaitzj en gmail.com> wrote:
> Aupa,
> Ando toqueteando con perl y no me sale ese tema.
> Tengo una cadena de 32 caracteres que representa 16 bytes en hex y lo
> tengo que pasar a 16 bytes de verdad, el problema es que no hay
> caracteres de separación asi que tengo algun problemilla, lo mas
> cercano que he conseguido es esto.
>
> perl prueba.pl 3532335ffea9318314c3b68fbc251f35
>
> @splittext = split(/(.*{2})/,$ARGV[0]);
> $packed = pack("H2" x 16, $splittext);
>
> El rollo es que el split no devuelve lo que deberia, mete campos nulos
> entre todos los campos del array, quedando (35, ,32, ,33......)
> Y eso, alguna idea.
> Saludos
> --
> Arkaitz
>


-- 
Arkaitz