On Wed, 2002-04-03 at 17:04, Jenda Krynicky wrote: > From: Chas Owens <[EMAIL PROTECTED]> > > On Wed, 2002-04-03 at 16:09, Nikola Janceski wrote: > > > I just found out that Perl 6 is going to be mainly OO (object > > > oriented for you beginners). Can someone give me a direct URL of > > > where I can find what is really going to happen? I do lots of Perl > > > programming and I really want to determine if this is going to be a > > > good thing, or bad. > > > > > > I really don't mean to take time away from you folks (ie. Japhy, > > > Jenda, etc.). > > > > > > Nikola Janceski > > > > First let me clear up some confusion: Perl 6 will still be Perl. You > > will be able to do everything you used to be able to do in Perl 5 with > > some small caveats: variable sigils ($@%) are now constant (ie you say > > @array[2] instead of $array[2]), the concatenation operator is > > changing from '.' to ' - ' (note the whitespace), the member of > > operator '->' is changing to '.', and various other small things. > > Also note that there WILL be a Perl5->Perl6 converter. > > Ah well ... it will HURT. I'm sure I'll envy the newcomers. Since it'll > take ages to get used to the new $@% meaning and the new > operators. > > I really wonder why couldn't we couldn't keep the good old -> :-((( > > Jenda > > =========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ========== > There is a reason for living. There must be. I've seen it somewhere. > It's just that in the mess on my table ... and in my brain > I can't find it.
I cried when I found out they were changing the concat and member of operators (see my other comment in this thread where I accidentally used the '-' operator instead of the ' _ ' operator). But as a consolation prize we can now say: <snip href="http://www.perl.com/pub/a/2002/04/01/exegesis4.html?page=2"> for @list -> $next { # iterate @list, aliasing each element to # $next (and to $_) print if length > 10;# same as: print $next if length $next > 10 %count{$next}++; } </snip> or <snip href="http://www.perl.com/pub/a/2002/04/01/exegesis4.html?page=2"> given check_online().{active}{names}[0] -> $name { when /^\w+$/ { print "$name's on first\n" } when /???/ { print "Who's on first\n" } } </snip> -- Today is Pungenday the 20th day of Discord in the YOLD 3168 Pzat! Missile Address: 33:48:3.521N 84:23:34.786W -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]