Darren Duncan wrote:
> Jon Lang wrote:
>> Darren Duncan wrote:
>>> I would assume that invoking .perl on a Junction would result in Perl
>>> code
>>> consisting of the appropriate any/all/etc expression. -- Darren Duncan
>> Tough to parse, though; and feels like a kludge.  I expect better of Perl
>> 6.
> What do you mean by "tough to parse" and "feels like a kludge"?

If I'm understanding Larry correctly, then given:

    my $choice = any(1..10);

$choice.perl will return the same thing that the following would:


That is, it would return a Junction of Str, not a Str.  So the
question is how to get something that returns an expression to the
effect of:

    'any(' ~ $choice.eigenstates.«perl.join(',') ~ ')'

Or, if I'm reading Larry incorrectly and $choice.perl provides the
latter, how do you get the former (without knowing ahead of time that
$choice is an any-junction)?


The other question is: given $choice as defined above, how do I find
out which type of junction it is?  Do I somehow call something that
would produce the latter string, and then extract the first word from
it?  Or is there a more direct way to find out which kind of Junction
you're dealing with?

Jonathan "Dataweaver" Lang

Reply via email to