On Sunday 07 July 2002 03:05 pm, Damian Conway wrote:
> Ashley Winters wrote:
> > How about:
> >
> > $_ = new Doberman for my Dog ($spot, $rover) is rw;
>
> <grin> I don't think so.
>
> In Perl 6 you'd just need:
>
> $_ = new Doberman for $spot, $rover;
Hmm, I thought the for topic was made ro at some point. Odd.
However, I still expect to be able to use my() in a loop condition/iterator
and have it visible to the outer scope!
given my Doberman $sis is female = .dog[0] but pregnant -> $mother {
for my Doberman @puppies = new Doberman x $mother.littersize
-> Doberman $puppy is cute {
my @colors := Doberman.colors;
$puppy.color = @colors[rand(@colors.end)];
}
$mother.labor($_) for @puppies;
}
$sis.feed();
I gave way too much thought to that. I need to go, now...
Ashley Winters
