Avec grep, si tu boucles directement sur les valeurs du tableau, c'est tout simple:
$ perl -E 'my @a = qw /toto tutu titi tato/; say join " ", grep {/u/}@a;'
tutu
Mais si tu boucles sur les...
Type: Messages; Utilisateur: Lolo78
Avec grep, si tu boucles directement sur les valeurs du tableau, c'est tout simple:
$ perl -E 'my @a = qw /toto tutu titi tato/; say join " ", grep {/u/}@a;'
tutu
Mais si tu boucles sur les...
Désolé, je n'ai pas copié-collé le code du bon essai (j'étais sur une tablette dans le train entre la manif de Paris et mon domicile quand j'ai écrit mon post précédent, et donc sans souris, et je...
Je ne suis toujours pas sûr de bien comprendre, mais j'ai essayé ceci à la ligne de commande bash:
perl -e '
use Data::Dumper;
use List::Util qw(reduce);
sub min_o (&@){
my $code_ref =...
Bonjour,
je ne comprends pas très bien.
Déjà, la fonction:
sub min_o (&@){
my $code_ref = shift;
return reduce {$code_ref->($a) < $code_ref->($b) ? $a : $b} @_;
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.