<br><div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Mostre o código!</blockquote><div><br><code><br>
sub factory {<br>
my $wanted = shift;<br>
my %factory = (<br>
'square' => sub { "square" },<br>
'triangle' => sub { "triangle" },<br>
);<br>
return $factory{$wanted}->();<br>
}<br>
<br>
print factory('triangle');<br></code><br>
</div><br></div><br>-- <br>Igor Sutton Lopes<br>t: +55 51 9627.0779<br>e: <a href="mailto:igor.sutton@gmail.com">igor.sutton@gmail.com</a>