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

Responder a