From pdupre at gmx.com Thu Jan 23 19:11:26 2020 From: pdupre at gmx.com (Patrick Dupre) Date: Thu, 23 Jan 2020 19:11:26 +0100 Subject: [Perl] map Message-ID: Bonsoir, Est-ce que l'on pourrait m'expliquer cette ligne de code map { {value => $_, index => $i++} } Merci. =========================================================================== Patrick DUPRÉ | | email: pdupre at gmx.com Laboratoire interdisciplinaire Carnot de Bourgogne 9 Avenue Alain Savary, BP 47870, 21078 DIJON Cedex FRANCE Tel: +33 (0)380395988 =========================================================================== From emmanuel at seyman.fr Thu Jan 23 19:29:15 2020 From: emmanuel at seyman.fr (Emmanuel Seyman) Date: Thu, 23 Jan 2020 19:29:15 +0100 Subject: [Perl] map In-Reply-To: References: Message-ID: <20200123182915.GA62396@orient.home> * Patrick Dupre [23/01/2020 19:11] : > > Est-ce que l'on pourrait m'expliquer cette ligne de code > > map { {value => $_, index => $i++} } map est une fonction qui prend une expression (ou un bloc de code) et un tableau. La fonction est alors appliquée à chacue élement du tableau et le résultat est envoyé. Ici, pour chaque élément, on renvoie un hash et on obtient donc un tableau de hash. [manu at lora ~]$ cat map.pl #!/usr/bin/perl use Data::Dumper; my @input = (2, 1); my $i; print Dumper map { {value => $_, index => $i++} } @input; [manu at lora ~]$ perl map.pl $VAR1 = { 'value' => 2, 'index' => 0 }; $VAR2 = { 'index' => 1, 'value' => 1 }; Emmanuel From pdupre at gmx.com Fri Jan 24 10:52:48 2020 From: pdupre at gmx.com (Patrick Dupre) Date: Fri, 24 Jan 2020 10:52:48 +0100 Subject: [Perl] print 1 elemnt of "list" Message-ID: Bonjour, J'ai une founction qui renvoie une liste. Comment je peux imprimer le i ieme element sans creer de variable ? print f() ; me revoie toute la liste. Merci. =========================================================================== Patrick DUPRÉ | | email: pdupre at gmx.com Laboratoire interdisciplinaire Carnot de Bourgogne 9 Avenue Alain Savary, BP 47870, 21078 DIJON Cedex FRANCE Tel: +33 (0)380395988 =========================================================================== From pdupre at gmx.com Fri Jan 24 11:21:31 2020 From: pdupre at gmx.com (Patrick Dupre) Date: Fri, 24 Jan 2020 11:21:31 +0100 Subject: [Perl] print 1 elemnt of "list" In-Reply-To: References: Message-ID: Dis autrement: Ceci functionne my @dim = $Mat_HF -> dims ; print shift @dim, "\n" ; Je voudrais faire my $Size = shift $Mat_HF -> dims ; print $Size, Ce qui gere une erreur ! > Bonjour, > > J'ai une founction qui renvoie une liste. > Comment je peux imprimer le i ieme element sans creer de variable ? > print f() ; > me revoie toute la liste. > > Merci. > > =========================================================================== > Patrick DUPRÉ | | email: pdupre at gmx.com > Laboratoire interdisciplinaire Carnot de Bourgogne > 9 Avenue Alain Savary, BP 47870, 21078 DIJON Cedex FRANCE > Tel: +33 (0)380395988 > =========================================================================== > > _______________________________________________ > Perl mailing list > Perl at mongueurs.net > http://listes.mongueurs.net/mailman/listinfo/perl > Attention, les archives sont publiques > From eiro at phear.org Fri Jan 24 11:22:02 2020 From: eiro at phear.org (Marc Chantreux) Date: Fri, 24 Jan 2020 11:22:02 +0100 Subject: [Perl] print 1 elemnt of "list" In-Reply-To: References: Message-ID: <20200124102202.GA12559@prometheus.u-strasbg.fr> > Comment je peux imprimer le i ieme element sans creer de variable ? > print f() ; alors perso j'ai tendance à écrire plutot comme ca print f et pour le premier élément: print +(f)[0]; (f) est une liste anonyme contenant les resultats de f [0] récupère le premier element de la liste + est la pour introduire le fait que ce qui suit est une expression (et donc la parenthèse n'est pas celle qui introduit les paramètres de la fonction). ca marche aussi quand t'as une expression pour le map par exemple: map +( $_ > 3 ? "ok" : "no" ), @liste; maintenant y'a des gens qui ont peur du + donc on trouve aussi print((f)[0]); (chacun ses phobies: moi c'est les parenthèses mal placées (je n'ai aucun problème avec les parenthèses dans scheme par exemple). bonne journée à toi. marc) From marc.hamelin at univ-fcomte.fr Fri Jan 24 11:17:35 2020 From: marc.hamelin at univ-fcomte.fr (marc hamelin) Date: Fri, 24 Jan 2020 11:17:35 +0100 (CET) Subject: [Perl] print 1 elemnt of "list" In-Reply-To: References: Message-ID: <433903174.6360645.1579861055240.JavaMail.zimbra@univ-fcomte.fr> bonjour, pas sur que ce soit le meilleur : perl -e 'sub f { return (1, 2, 3, 4, 5, 6) }; @l=f(); print $l[3]; print "\n";' Marc ----- Mail original ----- De: "Patrick Dupre" À: "perl" Envoyé: Vendredi 24 Janvier 2020 10:52:48 Objet: [Perl] print 1 elemnt of "list" Bonjour, J'ai une founction qui renvoie une liste. Comment je peux imprimer le i ieme element sans creer de variable ? print f() ; me revoie toute la liste. Merci. =========================================================================== Patrick DUPRÉ | | email: pdupre at gmx.com Laboratoire interdisciplinaire Carnot de Bourgogne 9 Avenue Alain Savary, BP 47870, 21078 DIJON Cedex FRANCE Tel: +33 (0)380395988 =========================================================================== _______________________________________________ Perl mailing list Perl at mongueurs.net http://listes.mongueurs.net/mailman/listinfo/perl Attention, les archives sont publiques From pdupre at gmx.com Fri Jan 24 12:20:30 2020 From: pdupre at gmx.com (Patrick Dupre) Date: Fri, 24 Jan 2020 12:20:30 +0100 Subject: [Perl] print 1 elemnt of "list" In-Reply-To: <20200124102202.GA12559@prometheus.u-strasbg.fr> References: <20200124102202.GA12559@prometheus.u-strasbg.fr> Message-ID: Fantastique. Merci =========================================================================== Patrick DUPRÉ | | email: pdupre at gmx.com Laboratoire interdisciplinaire Carnot de Bourgogne 9 Avenue Alain Savary, BP 47870, 21078 DIJON Cedex FRANCE Tel: +33 (0)380395988 =========================================================================== > Sent: Friday, January 24, 2020 at 11:22 AM > From: "Marc Chantreux" > To: "Liste francophone pour les questions générales sur Perl" > Subject: Re: [Perl] print 1 elemnt of "list" > > > > Comment je peux imprimer le i ieme element sans creer de variable ? > > print f() ; > > alors perso j'ai tendance à écrire plutot comme ca > > print f > > et pour le premier élément: > > print +(f)[0]; > > (f) est une liste anonyme contenant les resultats de f > [0] récupère le premier element de la liste > + est la pour introduire le fait que ce qui suit est > une expression (et donc la parenthèse > n'est pas celle qui introduit les paramètres de la fonction). > ca marche aussi quand t'as une expression pour le map par > exemple: map +( $_ > 3 ? "ok" : "no" ), @liste; > > maintenant y'a des gens qui ont peur du + donc on trouve aussi > > print((f)[0]); > > (chacun ses phobies: moi c'est les parenthèses mal placées (je n'ai > aucun problème avec les parenthèses dans scheme par exemple). > > bonne journée à toi. > > marc) > > > _______________________________________________ > Perl mailing list > Perl at mongueurs.net > http://listes.mongueurs.net/mailman/listinfo/perl > Attention, les archives sont publiques > From patrice.karatchentzeff at gmail.com Sun Jan 26 09:49:16 2020 From: patrice.karatchentzeff at gmail.com (Patrice Karatchentzeff) Date: Sun, 26 Jan 2020 09:49:16 +0100 Subject: [Perl] print 1 elemnt of "list" In-Reply-To: <433903174.6360645.1579861055240.JavaMail.zimbra@univ-fcomte.fr> References: <433903174.6360645.1579861055240.JavaMail.zimbra@univ-fcomte.fr> Message-ID: Salut Puisqu'on est là pour triturer perl... perl -e 'sub f{ return (1,2,3)}; for((f)) { print $_; exit}' PK Le ven. 24 janv. 2020 à 11:25, marc hamelin a écrit : > bonjour, > pas sur que ce soit le meilleur : > > perl -e 'sub f { return (1, 2, 3, 4, 5, 6) }; @l=f(); print $l[3]; print > "\n";' > > Marc > > ----- Mail original ----- > De: "Patrick Dupre" > À: "perl" > Envoyé: Vendredi 24 Janvier 2020 10:52:48 > Objet: [Perl] print 1 elemnt of "list" > > Bonjour, > > J'ai une founction qui renvoie une liste. > Comment je peux imprimer le i ieme element sans creer de variable ? > print f() ; > me revoie toute la liste. > > Merci. > > =========================================================================== > Patrick DUPRÉ | | email: pdupre at gmx.com > Laboratoire interdisciplinaire Carnot de Bourgogne > 9 Avenue Alain Savary, BP 47870, 21078 DIJON Cedex FRANCE > Tel: +33 (0)380395988 > =========================================================================== > > _______________________________________________ > Perl mailing list > Perl at mongueurs.net > http://listes.mongueurs.net/mailman/listinfo/perl > Attention, les archives sont publiques > _______________________________________________ > Perl mailing list > Perl at mongueurs.net > http://listes.mongueurs.net/mailman/listinfo/perl > Attention, les archives sont publiques > -- |\ _,,,---,,_ Patrice KARATCHENTZEFF ZZZzz /,`.-'`' -. ;-;;,_ mailto:patrice.karatchentzeff at gmail.com |,4- ) )-,_. ,\ ( `'-' '---''(_/--' `-'\_) -------------- section suivante -------------- Une pièce jointe HTML a été nettoyée... URL: From eiro at phear.org Sun Jan 26 10:00:27 2020 From: eiro at phear.org (Marc Chantreux) Date: Sun, 26 Jan 2020 10:00:27 +0100 Subject: [Perl] print 1 elemnt of "list" In-Reply-To: References: <433903174.6360645.1579861055240.JavaMail.zimbra@univ-fcomte.fr> Message-ID: <20200126090027.GA14279@prometheus.u-strasbg.fr> salut, > Puisqu'on est là pour triturer perl... > perl -e 'sub f{ return (1,2,3)}; for((f)) { print $_; exit}' sub f { 1 , 2 , 3 }; exit !print $_ for f a+ From dkrotkine at gmail.com Wed Jan 29 11:30:17 2020 From: dkrotkine at gmail.com (Damien Krotkine) Date: Wed, 29 Jan 2020 11:30:17 +0100 Subject: [Perl] print 1 elemnt of "list" In-Reply-To: <2fc7695e-1b7f-4149-9375-c1a5b61703cf@www.fastmail.com> References: <433903174.6360645.1579861055240.JavaMail.zimbra@univ-fcomte.fr> <20200126090027.GA14279@prometheus.u-strasbg.fr> <2fc7695e-1b7f-4149-9375-c1a5b61703cf@www.fastmail.com> Message-ID: <0bac98a7-adaf-4672-a67e-6458074fadef@www.fastmail.com> sub f { 1 , 2 , 3 }; print,last for f On Wed, Jan 29, 2020, at 11:30, Damien Krotkine wrote: > > sub f { 1 , 2 , 3 }; print,last for f > > > On Sun, Jan 26, 2020, at 10:00, Marc Chantreux wrote: > > salut, > > > > > Puisqu'on est là pour triturer perl... > > > perl -e 'sub f{ return (1,2,3)}; for((f)) { print $_; exit}' > > > > sub f { 1 , 2 , 3 }; exit !print $_ for f > > > > a+ > > _______________________________________________ > > Perl mailing list > > Perl at mongueurs.net > > http://listes.mongueurs.net/mailman/listinfo/perl > > Attention, les archives sont publiques > > From dams at eml.cc Wed Jan 29 11:30:07 2020 From: dams at eml.cc (Damien Krotkine) Date: Wed, 29 Jan 2020 11:30:07 +0100 Subject: [Perl] print 1 elemnt of "list" In-Reply-To: <20200126090027.GA14279@prometheus.u-strasbg.fr> References: <433903174.6360645.1579861055240.JavaMail.zimbra@univ-fcomte.fr> <20200126090027.GA14279@prometheus.u-strasbg.fr> Message-ID: <2fc7695e-1b7f-4149-9375-c1a5b61703cf@www.fastmail.com> sub f { 1 , 2 , 3 }; print,last for f On Sun, Jan 26, 2020, at 10:00, Marc Chantreux wrote: > salut, > > > Puisqu'on est là pour triturer perl... > > perl -e 'sub f{ return (1,2,3)}; for((f)) { print $_; exit}' > > sub f { 1 , 2 , 3 }; exit !print $_ for f > > a+ > _______________________________________________ > Perl mailing list > Perl at mongueurs.net > http://listes.mongueurs.net/mailman/listinfo/perl > Attention, les archives sont publiques >