NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

use Perl

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.

Without JavaScript enabled, you might want to use the classic discussion system instead. If you login, you can remember this preference.

nice and clear (Score:1)

by mpeters (5802)

I have to say that I've seen the other examples of this and I think this is definitely the cleanest and easiest to understand. Using $^a, $^b and $^c with the arity checks definitely beats all those pops, shifts, etc.
but just one thing more (Score:1)

by dpuu (6090)

I agree, though I think it might need a special-case for zero-arity so that could could write an arbitrary reduction:
'sum' => { @stack = [+] @stack }, ...
hmm, can that be written as assignment-operator?
'sum' => { @stack [+]= () },
- Re: (Score:1)
  
  by amahabal (8575)
  
  I was hoping to use zero arity like so:
  'pi' => { 3.1415926 }
  
  Perhaps
  'sum' => { @stack = [+]@stack; } but WholeStack,
  
  or something along those lines would work.