Re: Apoc2 - Context and variables

[John Siracusa]

On 5/4/01 11:09 PM, Nathan Wiger wrote:
> The real trick is what to do with these:

Note: stabbing wildly here... :)

> %a = (%b, %c);

    %a = (stringify(\%b) => \%c); # Perl 5-ish
    %a = (%b.str => %c);          # Perl 6 equiv.

> %d = (@e, @f);

    %d = (stringify(\@e) => \@f); # Perl 5-ish
    %d = (@e.str => @f);          # Perl 6 equiv.

> Or, horrors:
> 
> %i = ($j, %k, @l);

    %I = ($j => \%k, stringify(\@l) => undef); # Perl 5-ish
    %I = ($j.str => %k, @l.str => undef);      # Perl 6 equiv.

> ($m, @n, $o) = (@p, $q, %r);

    ($m, @n, $o) = (\@p, \@$q, \%r); # Perl 5-ish
    ($m, @n, $o) = (@p, $q, %r);     # Perl 6 equiv. :)

> Jeez, this is getting complicated. ;-)

...or maybe simpler?  We'll see... :)

-John