Só muda a expressão
m{^([\d\w]{1})(.*?)}s
$1 $2
Em 30 de abril de 2013 19:46, Tiago Peczenyj <[email protected]>escreveu:
> Bytes!
>
> Na verdade eh algo como
>
> 09 00 AF 1D..
> Em 30/04/2013 19:41, "Lucas Moraes" <[email protected]>
> escreveu:
>
> com regex você faz isso
>> m{(\d{1})(\d{1,})}s;
>> $1, $2
>>
>>
>> Em 30 de abril de 2013 19:37, Tiago Peczenyj
>> <[email protected]>escreveu:
>>
>>> Seguinte: tenho X bytes como
>>>
>>> $x="12345"
>>>
>>> E quero pegar o primeiro e o resto:
>>>
>>> ($a,$b) = magica $x;
>>>
>>> $a = 1
>>> $b = 2345
>>>
>>> Comofas?
>>>
>>> Eu posso fazer bytes::substr 2 vezes mas ta feio...
>>>
>>> =begin disclaimer
>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>>> SaoPaulo-pm mailing list: [email protected]
>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
>>> =end disclaimer
>>>
>>>
>>
>> =begin disclaimer
>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>> SaoPaulo-pm mailing list: [email protected]
>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
>> =end disclaimer
>>
>>
> =begin disclaimer
> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> SaoPaulo-pm mailing list: [email protected]
> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer
>
>
=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: [email protected]
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer
