<div>
                    Não pode transformar em um array?
                </div><div><br></div><div>perl -MData::Printer -e '$x="12345"; @foo = split//, $x; p @foo'</div><div><br></div><div><div>[</div><div>    [0] 1,</div><div>    [1] 2,</div><div>    [2] 3,</div><div>    [3] 4,</div><div>    [4] 5</div><div>]</div></div>
                <div><div><br></div><div>-- </div><div>Lorn</div><div><br></div></div>
                 
                <p style="color: #A0A0A8;">On Tuesday, April 30, 2013 at 7:37 PM, Tiago Peczenyj wrote:</p>
                <blockquote type="cite" style="border-left-style:solid;border-width:1px;margin-left:0px;padding-left:10px;">
                    <span><div><div><p>Seguinte: tenho X bytes como</p>
<p>$x="12345"</p>
<p>E quero pegar o primeiro e o resto:</p>
<p>($a,$b) = magica $x;</p>
<p>$a = 1<br>
$b = 2345</p>
<p>Comofas?</p>
<p>Eu posso fazer bytes::substr 2 vezes mas ta feio...</p>
</div><div><div>=begin disclaimer</div><div>   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org">http://sao-paulo.pm.org</a>/</div><div> SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a></div><div> L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>></div><div>=end disclaimer</div></div></div></span>
                 
                 
                 
                 
                </blockquote>
                 
                <div>
                    <br>
                </div>