Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

(Ovid) Re(2): Thoughts on Perl6 - Love it? Hate it?

by Ovid (Cardinal)
on Jan 10, 2002 at 22:39 UTC ( #137808=note: print w/replies, xml ) Need Help??

in reply to Re: Thoughts on Perl6 - Love it? Hate it?
in thread Thoughts on Perl6 - Love it? Hate it?

Just out of curiosity, I know there's still a lot up in the air (err?), but won't this be a syntax error?

@seen{@data} ^= 1;

You have an @ to designate "seen" as an array (Perl6 terminology, folks!, I know that's not correct for Perl5), but you're using the curlies for a hash. I am assuming that what you meant to do was use a hash slice of elements in @data and set all elements to 1 (true). If so, I believe that would be:

%seen{@data} ^= 1;

For those not familiar with Perl 6 idioms, that would be the equivalent of the following in Perl 5:

@seen{@data} = (1) x @data; # or foreach (@data) { $seen{ $_ } = 1; }


Join the Perlmonks Setiathome Group or just click on the the link and check out our stats.

Replies are listed 'Best First'.
Re: (Ovid) Re(2): Thoughts on Perl6 - Love it? Hate it?
by japhy (Canon) on Jan 10, 2002 at 23:54 UTC
    Dammit. Old habits die hard. I'm going to get flooded with those error messages, I'm sure.

    Jeff[japhy]Pinyan: Perl, regex, and perl hacker.
    s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://137808]
Discipulus redskins .. well native american..
[1nickt]: So if I was to offer any editorial advice it would be to (1) make it endure time passing (2) make it positive (3) make it about you and your beliefs
[1nickt]: (Disicpulus The new best choice is maybe "First People"
[karlgoethebier]: Discipulus: This is called "Volksverhetzung" in German which means
[karlgoethebier]: incitement of the people and it is prohibited by law
[1nickt]: The best sign I have sign in a protest march was carried by a kid of about 10 years "If you build a wall my generation will tear it down."
[1nickt]: ... sign I have seen ...
[1nickt]: Now that one made me hopeful! First time not angry in a long time when I saw that kid.
[Discipulus]: i propend for removing: why? because we are so few that we must find i minimal common divisor, this is certainly Perl not our (anyway private) thougths. And i say this still wondering because i love a lot freedom of expression. And i say this not for roho
[1nickt]: Discipulus that was the point of my story of taking the sticker off my truck. I know there are lots of people in the world who if I knw their private beliefs I might want to argue with them. And they with me. But life cannot all be arguments!

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (10)
As of 2017-06-22 12:12 GMT
Find Nodes?
    Voting Booth?
    How many monitors do you use while coding?

    Results (519 votes). Check out past polls.