Re: subset problem

2016-09-30 Thread mimosinnet
pv of Str where $_ (elem) $p; (pv) my pv $x = 'aa'; Type check failed in assignment to $x; expected pv but got Str ("aa") in block at line 3 Greetings, Marce -- (≧∇≦) Mimosinnet (Linux User: #463211) (≧∇≦) Ningún Lugar ▬

Sorting Multidimentional Arrays

2016-10-01 Thread mimosinnet
apper I wanted to ask about the syntax, buy I have understood it while writing the message ;) :D Leve the code just in case is useful for somebody else. Cheers! -- (≧∇≦) Mimosinnet (Linux User: #463211)

Re: Sorting Multidimentional Arrays

2016-10-01 Thread mimosinnet
El Saturday, 01 de October del 2016 a les 20:44, Moritz Lenz va escriure: On 01.10.2016 19:57, mimosinnet wrote: @opposite = @opposite.sort({@$^a[3]}); For the record, you can simplify this a bit: @opposite = @opposite.sort(*[3]); Waw! It works! Many thanks! I am still puzzled

Re: zef install Linenoise: Use of Nil in string context, (Linenoise) line 15

2018-04-26 Thread mimosinnet
El Wednesday, 25 de April del 2018 a les 18:31, Todd Chester va escriure: On 04/24/2018 11:30 AM, mimosinnet wrote: This message appears when installing Linenoise <--- $ zef install Linenoise ===> Installing: Linenoise:ver<0.1.1>:auth Use of Nil in string context  in block  at

Open files by given name and extension and ask for deletion

2018-02-12 Thread mimosinnet
ot;\n Press 'return' to continue "); } @files = '.'.IO.dir(test => /.*$ext$/); say "-" x 60; for @files -> $file { $file.Str.say } say "-" x 60; } --- -- (≧∇≦) Mimosinnet (Linux User: #463211)

Bailador vs. Cro

2018-07-08 Thread mimosinnet
ny advice or suggestions on Bailador, Cro (or another framework like Hiker [3]). Also, I would appreciate if you could point to some working examples (like [4] or [5] ). Many thanks! [1] https://www.youtube.com/watch?v=6CsBDnTUJ3A [2] https://github.com/mimosinnet/Cro-Personal-Web [3] https://github.

Re: how do I match the next two characters?

2018-01-18 Thread mimosinnet
Thanks for this thread El Tuesday, 16 de January del 2018 a les 19:28, Todd Chester va escriure: But I do have to use `.*?` in the middle when matching two things $ perl6 -e 'my $x="abcsdd1efg1234xyz"; $x ~~ m/(sd..).*?(12..)/; say "$0, $1"' sdd1, 1234 The '?' is not necessary ;-) perl6

Using HashBags

2018-04-07 Thread mimosinnet
y %docents; for @rows -> @row { %docents{ @row[0] } += @row[1]; } dd %docents; Output: Hash %docents = {:FE(4), :FV(8), :JF(9), :JP(8), :MM(8), :MPu(8)} --- As I understand it, this would better be achieved with the Bag or BagHash type. What would be the easy way? Thanks! -- (≧∇≦) Mimosinnet (Linux User: #463211)

zef install Linenoise: Use of Nil in string context, (Linenoise) line 15

2018-04-24 Thread mimosinnet
Any hints appreciated. Thanks! P.D.: Perl6 info: <--- $ perl6 -v This is Rakudo version 2018.02 built on MoarVM version 2018.02 implementing Perl 6.c. ---> -- (≧∇≦) Mimosinnet (Linux User: #463211)

Re: list comprehension

2019-02-11 Thread mimosinnet
\k { (k,x) if P x } for K) } for X) On Sun, Feb 10, 2019 at 10:26 AM mimosinnet wrote: Hi all, I wonder what would be the Perl notation for 'set-builders', as exposed in this wikipedia article: https://en.wikipedia.org/wiki/Set-builder_notation#Parallels_in_programming_languages This is the

list comprehension

2019-02-10 Thread mimosinnet
usr/bin/env perl6 my @L = 1 .. 10; my @K = 1 .. 10; my @X = 5 .. 15; say "Example 1:"; for @L -> $l { print "$l " if $l ∈ @L; } say "\nExample 2:"; for @K -> $k { for @X -> $x { print "($k, $x), " if ($k ∈ @K and $x ∈ @X and $x < 8); }} <--- -- (≧∇≦) Mimosinnet (Linux User: #463211)

lib for non-core, non-installed modules

2019-04-18 Thread mimosinnet
'); Is there a better syntax? Cheers! [1] https://stackoverflow.com/questions/51089505/trying-to-manage-perl6s-repo-at-runtime/51092821#51092821 -- (≧∇≦) Mimosinnet (Linux User: #463211)

Re: valid values?

2019-04-18 Thread mimosinnet
ve certain predefined values? I like this syntax: sub MAIN(Int $value where $value ∈ <1 2 4 8 16 >) { } It is readable and I really like to use the '∈' symbol :D. Cheers! -- (≧∇≦) Mimosinnet (Linux User: #463211)

perl6.org down and documentation

2019-04-21 Thread mimosinnet
dencies: Pod::Load:ver<0.4.0+>, Test::When, IO::Socket::SSL ===> Building: p6doc:ver<1.002001> Failed to create directory '/usr/share/perl6/site/doc' with mode '0o777': Failed to mkdir: Permission denied in method build at /home/mimosinnet/.zef/store/doc.git/ee6df93dcabb46e240f5f5c93

Re: perl6.org down and documentation

2019-04-21 Thread mimosinnet
Thank for the answers! Changing the owner of */usr/share/perl6/site/doc* to the user running zef allowed to install *p6doc*. We will be using these alternative websites meanwhile. Cheers! Missatge de Timo Paulssen del dia dg., 21 d’abr. 2019 a les 10:48: > Hi mimosinnet, > >

Re: Objects, TWEAK and return

2021-03-21 Thread mimosinnet
Waw! :) Following your examples and suggestions, these work: > class { submethod TWEAK(-->Nil) { Any.map: {say 99} } }.new; > class { submethod TWEAK { sink Any.map: {say 99} } }.new; > class { submethod TWEAK { eager Any.map: {say 99} } }.new; I really appreciate your discussion. Let me know

Objects, TWEAK and return

2021-03-13 Thread mimosinnet
Hi, When working with this week challenge for the PerlWeeklyChallenge , I noticed this behaviour with TWEAK: *This does not work:* submethod TWEAK { $!filelist.lines».split(',').map( -> ($a, $b) { @!show.push: ( $a, $b ) }); } *This works:* submethod