[Perl] print 1 elemnt of "list"

[Damien Krotkine]

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
>