Help for this page

Select Code to Download


  1. or download this
    sub evalop
    {
            my (@list) = @{[@{$_[0]}]};
            my $val = shift(@list)->();
    
  2. or download this
       @{$_[0]}     # easy --- deference an array reference
    [  @{$_[0]} ]    # ok --- turn it back into an array ref.. why?
    ...
                                 # we have an array, but how is it 
                                 # different from the first array we
                                 # dereferenced?