[Cascavel-pm] Arquivo configuracao a parte

[Igor Sutton]

> Mostre o código!


<code>
sub factory {
    my $wanted = shift;
    my %factory = (
        'square' => sub { "square" },
        'triangle' => sub { "triangle" },
    );
    return $factory{$wanted}->();
}

print factory('triangle');
</code>



-- 
Igor Sutton Lopes
t: +55 51 9627.0779
e: igor.sutton em gmail.com
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20060816/abcaa8f9/attachment.html