[SP-pm] Entendendo Protótipos

Daniel de Oliveira Mantovani daniel.oliveira.mantovani at gmail.com
Mon Dec 22 16:10:42 PST 2008


my $stat = período();
Bom(a) $stat pessoal.

Estou estudando Protótipos, e tenho algumas dúvidas vou tentar explicar.

Por exemplo push(@array,$item);

No protótipo é a mesma coisa que isso ?

syb mypush (@array, $item);

Ele faz a mesma coisa que push só que joga na sub rotina e o valor fica
armazenado em @_ ?

No livro da um exemplo que eu não entendi o que esse try faz, no caso é um
protótipo:
Mas o que é esse ( &$ ) ?

sub try (&$) {
my ($try, $catch) = @_;
eval { $&$try };
if ($@) {
local $_ = $@;
&$catch;
}
}
sub catch (&) { $_[0] }

try }
die "fui";
}
catch {
 /fui/ and print "voltei\n";
};
Página 231 do livro Programação Perl.

[]s
-- 
-------(\_------------_/)-----------
-------)--(----------)--(-----------
------(----(--------)----)----------
-------)----(------)----(-----------
-------(----(------)----)-----------
--------\_-(\\.--.//)-_/------------
----------\)`-6--6-'(/--------------
-----------/--------\---------------
----------(--)----(--)--------------
-----------`(_c__c_)`---------------
--------------`--`------------------
http://mantovanihouse.blogspot.com/
-------------- Pr?xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20081222/6e23a6b5/attachment.html>


More information about the SaoPaulo-pm mailing list