<div class="gmail_quote"><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
my $search_titulo = "The Catcher in The Rye";<br>
my @filtered = grep { $_->titulo eq $search_titulo } @livros;<br>
<br></blockquote><div><br>God damned! It's Perl!<br><br>Funciona. Mas isso é razoável em um contexto orientado a objeto? Resolveu meu problema de agora, mas provavelmente eu vou ter que fazer alguma classe contendo uma interface que simplifique para outro programador o uso disso.<br>
<br>Tem algo pronto para esse tipo de situação (CPAN)?<br><br>Se não tiver, ok, mas eu não queria "fazer do meu jeito" só por fazer.<br><br>Foi mal se estou falando/fazendo/pensando bobagem.<br><br>[]s<br>Gilberto<br>
<br><br></div></div>