On Mon, Mar 13, 2017 at 11:32:25AM -0700, Sean McAfee wrote: > In Perl 5 ...
> 1 == (my ($script) = $page->find('//script'))
> or die "Other than exactly one script element found";
> Can a similar expression that avoids an intermediate array variable be
> written in Perl 6?
This does that:
1 == ( my $script = {1,}() ).elems or die 'Not a 1 element list.';
Rob
