json

ved characters]". [3] Is that still correct or out of date?) ---- > Perl suffers from having too many magical operators that makes it hard to reason about a snippet of code. I feel Python strikes the right balance. To quote Larry Wall, "Perl 6 ... has been rethought and rebalanced on every level".[4] It might be interesting for you to pick a couple Perl 5 operators that you consider too magical; then we could look at the merits and demerits of those ops in Perl 5 and their equivalents in Python and Perl 6. > It's very easy to express ideas I have in mind without worrying about the details [of Python, now, and Perl, back in the day] This, of course, has explicitly been a deliberate focus of all the Perls. Part of the point of Perl 6 was to remove the bits in Perl 5 that were problematic (including some "too cute/weird" stuff) and to introduce much nicer higher level abstractions (eg grammars instead of just regexes[5]). ---- I've long encountered vocal folk who underestimate or misunderstand Larry Wall and Perl to an absurd degree. Perl has been focused for over two decades on making it easy to get the right results when doing basic practical things (like integer division and counting characters) and, imo, that ought to be obvious to anyone who looks at the matter carefully. ---- [1] http://www.slideshare.net/Ovid/perl-6-for-mere-mortals and https://www.youtube.com/watch?v=lpu-3UF_b48 [2] http://www.reddit.com/r/perl/comments/2szv7m/beginner_progra... [3] http://unicode-programming.readthedocs.org/en/latest/count-c... [4] http://www.infoworld.com/article/2882300/perl/perl-creator-l... [5] https://github.com/moritz/json/blob/master/lib/JSON/Tiny/Gra...

ing any change in code that uses regexes (unless an engine uses a different syntax of course). (But it takes a lot of effort to package a regex engine up for use with Perl 5.) A given regex engine can be extended using the overload module. Extending is relatively easy. = About Perl 6 regexes = A whole new ball game, two decades ahead of Perl 5 regexes. http://en.wikipedia.org/wiki/Perl_6_rules http://doc.perl6.org/language/grammars https://github.com/moritz/json/blob/master/lib/JSON/Tiny/Gra... Generally matches Perl 5 regexes feature-for-feature but with a much cleaner syntax. More importantly, unifies regexes and grammars. Currently way slower than Python or Perl 5 regexes. Supposedly will eventually (5 years? 10?) incorporate all the key optimizations in the Perl 5 engine and become faster than Perl 5 regexes.

earn". ( I for one found it quite easy to learn, and can read it quickly. ) --- Really can you make all of the following examples clearer in any other single language? constant powers-of-two = 2,4,8 ... *; # an infinite deductive list # perhaps that would be more clear as: constant powers-of-two = 2, 4, 8, 16, 32, 64 ... *; # list of pairs using the zip meta-operator (Z) # combined with the pair constructor operator (=>) my @a = 'a'..'z' Z=> 0..*; # ( a => 0, b => 1, etc ) my $new-password = ('a'..'z','A'..'Z',0..9).roll(12).join; # 'ygHIHbi4XgUV' # the zero in the following is to prevent an off-by-one error # when accessing by index # * + * creates a code ref that takes two inputs and numerically adds them together constant fibonacci-list = 0, 1, 1, * + * ... *; # takes about a second the first time it's accessed currently say fibonacci-list[10000].chars == 2090; # if you wanted it to look more like haskell you could write it like this: constant fibonacci-list = 0, 1, 1, &[+] ... *; my @dice-rolls := ('⚀'..'⚅').roll(*); # infinite list of dice rolls # deck of cards using the cross meta-operator (X) # and the string concatenation operator (~) my @deck = 2..10,<J Q K A> X~ <♡ ♢ ♣ ♠>; my @shuffled = @deck.pick(*); # ( .say ) is short for ( $_.say ) # prints the first 6 numbers (0..5) each on it's own line for ^6 { .say } # prints the numbers 0..5 each on it's own line, # possibly randomized, # possibly each in it's own thread ( texas version ) (0..^6)>>.say; (^6)».say; # ditto ( french version ) # ( those were purposefully misusing an auto-threading list operator >> ) # says a random number (1..5), 5 times out of 6 if (0..5).pick -> $number { say $number } if (0..5).pick { say $^number } # ditto --- That was just a sampling of the bread-and-butter constructs (some of which were used in a way that most people wouldn't use them). There are also operators for dealing with Sets for example. ( ⋃ and (elem) being two of them ) see: http://doc.perl6.org/ You can even create new operators the same way you define a subroutine ( That's all they are in the Rakudo implementation, for most of them. ) # common factorial example sub postfix:<!> ( Int \n where * >= 0 ) is tighter(&infix:<*>) { [*] 1..n } say 5!; # 120