Re: [SP-pm] Separar o primeiro do resto

Wed, 01 May 2013 06:55:21 -0700 

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], 1)
    }


=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