* cor...@free.fr <cor...@free.fr> [23-04/04=Tu 10:35 +0800]:
> For instance, in ruby (irb) this is quite smooth:
> irb(main):001:0> [1,2,3,4].map{|x|x+1}.reduce{|x,y|x+y}
> => 14
>
> And in scala (shell):
> scala> List(1,2,3,4).map{ _+1 }.reduce{_+_}
> res1: Int = 14
> In perl there is no interactive shell [...]
perl -le 'print eval $_ while <>'
> In perl [...] the block statement seems strange:
> $ perl -le '@x=(1,2,3,4); $sum+=$_ for( map {$_+1} @x );print $sum'
> 14
perl -le '@x=(1..4); print eval join "+", map $_+1, @x'
Too bad this is two days late, but Perl is an April 1 kind of language.
