tag:blogger.com,1999:blog-1320528867223721914.post5907854647375453457..comments2024-03-18T10:00:22.981+01:00Comments on #!/perl/bioinfo: Buscar un elemento en un array de perlbrunocontrerashttp://www.blogger.com/profile/06780659979139333360noreply@blogger.comBlogger2125tag:blogger.com,1999:blog-1320528867223721914.post-41537887324744585672010-11-10T09:34:11.780+01:002010-11-10T09:34:11.780+01:00Me quedo con la solución de perl 5 y con la impres...Me quedo con la solución de perl 5 y con la impresión que tengo que actualizar bastante mis conocimientos de Perl :DAnonymoushttps://www.blogger.com/profile/01111762212594457636noreply@blogger.comtag:blogger.com,1999:blog-1320528867223721914.post-2169455072228577292010-11-10T00:59:33.475+01:002010-11-10T00:59:33.475+01:00En Perl moderno, usamos el Smart Matching:
use 5....En Perl moderno, usamos el Smart Matching:<br /><br />use 5.010;<br />$x = "hola";<br />@y = qw( Le dijimos hola a la abuela );<br />say "Sí está" if $x ~~ @y;<br /><br />Más información en perlsyn.<br /><br />Para aquellos que aún sigan usando versiones antiguas de Perl, valdría con un simple grep():<br /><br />$x = "hola";<br />@y = qw( Le dijimos hola a la abuela );<br />print "Sí está\n" if grep { $_ eq $x } @y;Anonymousnoreply@blogger.com