Re: my command line notes:

2017-03-14 Thread ToddAndMargo
On 03/14/2017 01:26 PM, Will Coleda wrote: FYI https://docs.perl6.org/language/functions#index-entry-MAIN Thank you!

Re: my command line notes:

2017-03-14 Thread ToddAndMargo
On 03/14/2017 01:37 PM, ToddAndMargo wrote: On 03/14/2017 01:26 PM, Will Coleda wrote: FYI https://docs.perl6.org/language/functions#index-entry-MAIN Thank you! So far, I haven't gotten to creative: my $DebugFlag = @*ARGS.elems; # generate a crash report if > 0

my command line notes:

2017-03-14 Thread ToddAndMargo
Hi All, I wrote myself a little demonstration program on reading elements from the command line. I thought it might be useful to others (DuckDuckGo is a bust on Perl 6 and the command line): -T Perl 6: command line parameters: #!/usr/bin/perl6 if not @*ARGS.elems > 0 { say "command line

Re: my command line notes:

2017-03-14 Thread Will Coleda
FYI https://docs.perl6.org/language/functions#index-entry-MAIN On Tue, Mar 14, 2017 at 3:58 PM, ToddAndMargo wrote: > Hi All, > > I wrote myself a little demonstration program on > reading elements from the command line. I thought > it might be useful to others

please apply to this CfP

2017-03-14 Thread Marc Chantreux
hello people, Polyconf comes to Paris in 2017: https://eventil.com/events/polyconf-17/submissions/new and I would be really important to have a perl6 primer there. Any volonteer ? regards -- Marc Chantreux (eiro on github and freenode) http://eiro.github.com/

sympa hackathon: perl6 for the IM part ?

2017-03-14 Thread Marc Chantreux
hello perl6 hackers, as some of you knows, there is a sympa hackathon in 3 weeks at Strasbourg. https://listes.renater.fr/sympa/arc/sympa-developpers/2017-02/msg0.html we talked about having an optionnal IM integration to the web UI using perl6. i'm really excited about it! if someone

Re: lazy gather?

2017-03-14 Thread Siavash
Note that you can also use a map: my \approx= fib.rotor(2 => -1).map: { .[1] ÷ .[0] }; On 2017-03-14 09:00:34 GMT, Marc Chantreux wrote: > On Mon, Mar 13, 2017 at 08:33:05PM +0330, Siavash wrote: >> I may be wrong, but I think the code should be: >> my \golden= (1 + sqrt 5) ÷ 2; >> my

Re: lazy gather?

2017-03-14 Thread Andreas Mueller
or in one line in REPL: ((1,1,*+* ... *).rotor(2=>-1).map:{[/] $_}) ... (*-*).abs < 1e-10 -am On 14.03.17 12:37, Siavash wrote: > > Note that you can also use a map: > > my \approx= fib.rotor(2 => -1).map: { .[1] ÷ .[0] }; > > On 2017-03-14 09:00:34 GMT, Marc Chantreux wrote: > >

Re: more match humility

2017-03-14 Thread Brent Laabs
I'm not sure what you mean by lexiconical. I can't find any references to it in the official perl documentation (which would technically be lexicanonical, right?). But if you're talking about lexical scope, then yeah, Perl 6 enforces that even more than Perl 5 does by default. On Mon, Mar 13,

Re: more match humility

2017-03-14 Thread ToddAndMargo
On 03/14/2017 12:02 AM, Brent Laabs wrote: I'm not sure what you mean by lexiconical. I can't find any references to it in the official perl documentation (which would technically be lexicanonical, right?). The joke was that everything you did not understand was lexiconical. But if you're

Re: preassigned names in pattern matches?

2017-03-14 Thread Elizabeth Mattijsen
> On 14 Mar 2017, at 02:04, ToddAndMargo wrote: > On 03/13/2017 02:21 PM, Elizabeth Mattijsen wrote: >>> On 13 Mar 2017, at 22:17, ToddAndMargo wrote: >>> I adore this feature of loops: >>> >>> perl6 -e 'my @x=qw[a b z y]; >>> for @x -> $a, $b {

Re: preassigned names in pattern matches?

2017-03-14 Thread ToddAndMargo
On 03/14/2017 01:51 AM, Elizabeth Mattijsen wrote: On 14 Mar 2017, at 02:04, ToddAndMargo wrote: On 03/13/2017 02:21 PM, Elizabeth Mattijsen wrote: On 13 Mar 2017, at 22:17, ToddAndMargo wrote: I adore this feature of loops: perl6 -e 'my @x=qw[a

Re: What to do when a pattern match fails

2017-03-14 Thread Andy Bach
On Mon, Mar 13, 2017 at 8:40 PM, ToddAndMargo wrote: > To grab something from the middle: > > $ perl6 -e 'my $x="blah(good stuff 123)yuk"; > $x ~~ m |.*\((.*)\)|; > say "$x\n\$0=<$0>";' > Just a further refinement - if you want only the stuff between inner