hello perl6 people,
we hope there will be some events around the French Perl Worshop
(aka journées perl)
https://journeesperl.fr/jp2019/
there will be at least a "perl6 modules hackathon" (trying to contribute
to the perl6 ecosystem). however i really would like to see a talk or a
workshop a
hello people,
French Perl Workshop is coming and would be a better
event if *you* take part of it
https://journeesperl.fr/jp2019/talks
now the problem ...
let's say i have a raku script to wrap mutt.
in this script, i have
* $body is the content of the body my message
* $subject a
> Something like this?
> my $p = run 'cat', '-n', :in, :out;
> $p.in.say($_) for ;
> $p.in.close;
> say $p.out.slurp;
*that* simple!!! perfect ... thanks a lot!
this isn't obvious to guess that '-' means "you can connect the
subprocess directly to the perl interpreter". i
hello,
> Actually -- looks like it is there :-) though on the
> Proc page, not the 'run' page --
too far from the expected lines. so maybe we should just add a link ?
> I'm curious about whether you could rely
> on a line being emitted right away -- e.g.
> if there is some output-buffering of th
hello people,
in perl5, i can
print for
map s/^/4/r,
grep /^\d+$/,
the perl6 version is a Seq, so much more memory friendly
but i expected (and haven't found in the documentation)
a short equivalent of s///r so the shorter i have is:
$*ARGFILES
hello,
On Tue, Jun 11, 2019 at 08:26:11AM -0500, Brad Gilbert wrote:
> The /r modifier on s/// in Perl5 is S/// in Perl6.
oops .. it was the section just after s/// :( thanks for pointing out.
> Though you have to put it into a block lambda, otherwise it applies to
> $_ before it gets a chance t
hello people,
i just read this https://linuxfr.org/news/sortie-de-perl-5-30-0 in which
the informations about perl6 are wrong. it points to
https://fr.wikipedia.org/wiki/Rakudo_Perl which is wrong too and i was
thinking that instead of writting wrong stuff on wrong sites, it would
be nice to have
hello Laurent,
> the French Wikipedia page you refer to is not really wrong, but rather
> terribly outdated and, therefore, no longer correct. I have a Wikipedia
> account and can easily fix that page (using, if needed, the updated English
> Wikipedia page on the same subject).
The very first sen
hello,
> There have been some efforts to translate perl6intro; but as Laurent says,
> we can hardly say the documentation is complete, so diverting resources to
> translation is probably not such a good idea.
yeah. when laurent spoke about a moving target, i gave a look at the doc
repo and there
hello people,
i have a game where every opponent much play every other ones
so i implemented vs to get a list of all the matches from a list
of opponents.
i'm pretty sure that there is a shorter/more beautiful solution than
mine so i really would like to see.
mine is
sub vs (@xs ( $head, *@ta
On Tue, Jul 09, 2019 at 11:44:07PM +0200, Laurent Rosenfeld via perl6-users
wrote:
> You might want to take a look at the cross ("X") operator, which takes two
> or more lists as arguments and returns a list or all lists that can be
> constructed combining the elements of each list (or, in other w
hello,
On Tue, Jul 09, 2019 at 11:28:29PM +0200, Laurent Rosenfeld via perl6-users
wrote:
> I have updated the Wikipedia page linked in Marc's message. @Marc: please
> check it and let me know if you see any remaining issues.
reading the fix, i realized i mixed up the errors of the linuxfr page
hello Bruce;
> # Elegant using the "cat-ears" range modifiers in Perl 6:
> for 0 ..^ @players.end -> \i {
> for i ^.. @players.end -> \j {
> say @players[i,j].join(' vs ');
> }
> }
> # See https://docs.perl6.org/type/Range
i played around it and got:
my @players = ;
my
hello people,
AÀM (Appel À Mousser) is the monthly social event of the Strasbourg(fr)
LUG. the dates of those meetings are scheduled by an algorithm
implemented in aam_dates_of_year (line 6).
Now i would like to show 25 AAM dates staring from 2019-01. line 14
works fine but is too long. i really
hello Bruce,
> Short answer: Add `flat` before `lazy in line 19, and remove `.flat` from
> line 21. Like so:
> my @future_aams =
> flat lazy gather for 2019..∞ { take .&aam_dates_of_year };
sure but i loose the ability to use @future_aams year by year.
the best i i have here to keep
hello,
question: in raku, is there a faster solution than
say [+] lines
long story;
here is a thread i would like to reply to
https://stackoverflow.com/questions/450799/shell-command-to-sum-integers-one-per-line
because:
* the perl5 answer is fast compared to the other dynamic langages
* t
hello people,
short question: how to use $*ARGFILES in a MAIN function?
context:
as an exercice as well as demo, i reimplement unix filters
(cat, grep, wc, join, paste, ...). Basic wc could be
multi sub MAIN ( :$l ) { say +lines }
multi sub MAIN ( :$c ) { say [+] lines>>.chars }
multi sub
hello,
> > multi sub MAIN ( :$c ) { say [+] lines>>.chars }
> Isn't that just `slurp.chars` ?
correct :)
> > multi sub MAIN ( :$w ) { say [+] lines.map: +*.words }
> Isn't that just `+words` ?
Aren't you awesome ? At least you're right: the doc says:
multi sub words
( IO::Handle:D $fh =
hello liz and Vittore,
> bypassing $*ARGFILES.lines by using $*IN.lines, makes it faster for me than
> using slurp
$*ARGFILES is the correct FH to use when it comes to write unix filters
(as it was in the other examples of the page).
> > say lines.map(*.Int).sum
i recently read that >> cou
hello Vittore,
> Ok, I am 100% sure that, if people use it, eventually $*ARGFILES will
> become as fast as $*IN. Because of people like Liz working on the project
functions like slurp, lines, words already depends on $*ARGFILES (which
is awesome, i think) so i have no doubt there will be attentio
On Mon, Sep 23, 2019 at 11:34:14PM -0500, Brad Gilbert wrote:
> You can create your own $*ARGFILES.
>
> sub MAIN ( +@ARGS ){
> my $*ARGFILES = IO::ArgFiles.new( @ARGS || $*IN );
> .say for lines;
> }
the way i understand https://docs.perl6.org/language/variables, my
dynamic (m
hello,
i don't know if it's useful to feedback on it but i would like to share
about MAIN.
this is a very nice thing to have it built-in so the quality of your
scripts can be improved without effort ($*USAGE is very nice!) but
here are some parts i feel i miss.
* dealing with $*ARGFILES should b
hello,
> > > > nice ... but when x is ~ 75440 (not always), there is a problem
> > > What is x here?
> > sorry. x is the arg of seq (number of lines).
> That never happens on my laptop
well.. so it's a problem with my station. nevermind :)
thanks again for helping
marc
hello,
> though that works here, admittedly, my p6 is sort old
> This is Rakudo version 2018.03 built on MoarVM version 2018.03
> implementing Perl 6.c.
this lead me test it with the docker rakudo-star (2019.03).
time docker run rakudo-star bash -c 'seq 1|
perl6 -e ''slurp.split("\
hello,
> should make it a bit faster, at the expense of *much* more memory
> usage, as opposed to just.
i was just reporting. perl6 isn't fast enough in this case to compare
with other dynamic langages.
> In any case, to get the same result, you could also do
>
> (0..10_000_00).sum.say
>
>
hello people,
removing shell scripts is a good way to learn raku and compare.
today i want to replace this:
fix () {
awk -F, '{print $1" "$2}' |
sort -u |
awk -F" " '{
if (seen == $1) print "\t"$2;
else { seen = $1; print
hello,
On Fri, Nov 22, 2019 at 03:07:28PM +0100, Patrick Spek via perl6-users wrote:
> Could you post some input and expected output? That would make it
> easier for me (and perhaps others) to see what exactly you're trying to
> accomplish, in practical terms.
sorry ... i'm so confortable with aw
> From a quick look through ``Perl6/Grammar.nqp`` and
> ``Perl6/Actions.nqp``, I think that the semicolon is special-cased by
> the compiler, so the slightly ugly way above (call the operator
> directly) is probably the only way that works.
*this* is the level of expertise i miss :) thanks for you
On Fri, Nov 22, 2019 at 06:20:51AM -0800, William Michels via perl6-users wrote:
> Hi Marc, I did a search for 'semicolon' on the following page and
> found the interesting text below. Semicolons are used to create
> multidimensional lists, maybe that's what's going on in your code?
indeed! i trie
hello Bruce,
> The first key of each second level is missing, which differs from your sample
> output above.
> Have I corrupted your Awk code, or have I misunderstood something, or what?
you just spotted a bug: the first subkey *is* indeed required. actually
fixing the bug makes the awk version
hello Timo,
> lines()>>.trim-leading.classify(*.split(",").head(2)); say to-json %foo'
which led me to this solution:
fix () perl6 -e '
lines.classify(*.split(",").head(2)).pairs.map: {
.say for .key, |.value.map({ "\t" ~ .key });
}
'
fix () perl6 -e '
hello,
> FWIW, I would make %section an HoA, which would be a less compact
> structure in memory, but allows more succinct manipulation, like so:
> my %section = lines()
> .map( *.split(",") )
> .classify( { .[0] }, :as{ .[1] } );
> for %section.sort {
> say .key;
>
hello,
> Hi Marc, I tried the first solution you posted and the "subheaders"
> are returned out of order (e.g. "2,1,3" and not "1,2,3"):
you're right but it doesn't matter in this usecase.
> mbook:~ homedir$ cat p6_chunk_csv.p6
> lines.classify(*.split(",").head(2)).pairs.map: {
>
hello,
> You could also use the feed operator
is there a reason to do so? i see none.
regards
marc
> I don't think so; just a stylistic choice
well ... i tested ===> once because i'll choose any syntax that can
spare me parenthesis especially in raku because i feel they are in
the wrong place (scheme makes parenthesis right).
Raku behaves better than perl in this regard because
say (f 12)
hello,
2020 describes itself as it is composed by
2 0
0 1
2 2
0 3
perfect golf excuse! I have :
sub is_autobiographic (\x) {
my \s = x.Str;
my @r = s.comb;
my %appearance_of;
%appearance_of{$_}++ for @r;
x ~~ join '', (%appearance_of{$
On Tue, Dec 31, 2019 at 03:16:50PM +0100, Tobias Boege wrote:
> Here is my entry, having a Bag count the occurences of letters,
> instead of the loop over @r you used.
i'm not used to bags so i always forget it. i really love the
your final code. thanks
regards
marc
hello people,
i read an annoncement for rakudo 2019.11
and the last github release confirms that.
so i started to update the guix package
before discovering that the rakudo.org page
still points to 2019.03.
is there a problem with the last version or
os rakudo.org just outdated?
regards.
marc
hello ToddAndMargo,
> Can I declare a subroutine as a variable?
just use the callable sigil (https://docs.perl6.org/type/Callable).
those are 3 ways to write the same sub:
sub foo ($x) { $x * $x }
my &foo = -> $x { $x * $x }
my &foo = * * *;
regards,
marc
hello rakuists,
i want to work on raku-vim and saw that some PR from january aren't
merged (https://github.com/Raku/vim-raku/pulls) so i would like to
discuss about my roadmap with any interested people.
my goals:
* remove references to perl6
* remove mappings that shouldn't be in a public packa
hello,
> I think this got pulled into the Raku org so it didn't get lost - I
> don't think anyone is "in charge" at the moment. I'll review the
> existing PRs and apply them if possible.
There was a public call to take over it some mounths ago. i haven't
applied because i was affraid of the lack
hello,
On Tue, Jul 21, 2020 at 10:56:22PM -0300, Aureliano Guedes wrote:
> Then, a native call to R may be better cus bring us dataframe an a lot of
> statistical functions natively without other R's package.
coming from perl/shell and having to use pandas a little bit, my current
perception of "
> > df.column1 ... return a list of values on this column
> That thought should be a topic in its own right.
what i really like in raku is that chance to not have all those fancy
keywords just because langages lack of syntax so stealing from
pandas, incanter, and others is a good idea only if we d
hello,
I just saw this and it's very good
https://www.youtube.com/watch?v=elalwvfmYgk
The features he picked are indeed things i really like in raku
and i learned some interesting details. Other details are still
bugging me so i have some questions there:
A. if x -> $y with //
For exemple, giv
Hello,
> > sub foo ( Int $x ) { 0 if $x > 5 }
> > sub hello {say "hello $^world"}
> > if defined my $value = foo 45 { hello $value }
>with foo 7 { say $^value }
i feel really dumb right now as i just used with and didn't made the
match in my head.
> or if you want to trigger on *not* d
hello,
i would like to get the list of opening (α) and closing
(ω) separators from this string:
&""''(){}[]
too many years of perl made me think about this solution
or something alike but it didn't work.
my (\α,\ω) =| map
{ .[0,2…∞], .[1,3…∞] },
q&""''(){}[]&.comb;
fixing this is i
thanks everyone for sharing,
Vadim,
my ($a, $b) = { @^a[0,2...Inf], @a[1,3...Inf] }.(q<(){}[]>.comb); say $a[0];
say $b[0]
oh. i never see this direct call of a lambda before but it really makes
sense! this is the answer i like the most.
i rewrote it my way and this works
my ($a, $b) = { .[0,
hello Yary,
> and my instinct is that "map" is adding a layer you don't need or want for
> this issue, should just be sending the results of comb to a block. But I
> can't quite get the syntax right (and docs.raku.org seems down at the
> moment)
With this and what i understood from Vladim, i trie
hello William,
> your string, or whether-or-not some might be nested within each other. You
> show a lone ampersand ("&") at the beginning of your example, but other
> strings may not be so simple.
really sorry about this artefact from previous attempts :(
> > $string.comb(/ ( <:Ps> ~ <:Pe> .?)
hello everyone,
I made a mistake while replying to all of us so anwsers never reached
your boxes. I'll summerize in one answer:
Bill:
> Is it just even/odd elements that you want to separate out? If so, maybe
> .grep() is your friend here
I don't think it is: 0, 2 ... * seems to be
* closer to
hello people,
D526P:
https://docs.raku.org/language/5to6-nutshell#index-entry-PERL6LIB-PERL6LIB
DFIM : https://docs.raku.org/language/modules#Finding_installed_modules
DLIB :
https://docs.raku.org/programs/03-environment-variables#index-entry-RAKULIB
This D526P is deprecated and some RAKULIB de
Hello,
> The best would be if you propose a PR or open an issue at
> https://github.com/Raku/doc. Any help with the documentation would
> most certainly be appreciated as people working on the docs project
> are overloaded.
Sorry I was late on this because I wasn't sure how to revamp the whole
th
hello rakoons,
I want to be able to parse this:
CSV.parse(
'162,1,2,"Watt, Mrs. James (Elizabeth ""Bessie"" Inglis
Milne)",female,40,0,0,C.A. 33595,15.75,,S',
actions => CSV_as_table.new,
).made.say;
I wrote this simple Grammar and action
grammar CSV {
rule TOP {* %% \n }
tok
hello,
Le Fri, Nov 19, 2021 at 07:12:13AM +0100, JJ Merelo a écrit :
> Thanks a lot.
well ... not sure who should thank someone here .. i meant: you spent so
much more time on the raku ecosystem than i did ...
thanks everyone.
hello Ralph,
Thank you for the whole explaination and links.
> method col:sym ($_) { .make: S:g/'""'/"/ }
i dug around it but missed it! arggh ...
> > am I right when i feel there is a way to do this
> > substitution inside the grammar
> As I've shown, yes. But it draws you into the `$/` dance
hello,
> I like ruby and perl
so do I but raku is by far my prefered interpreted langage now.
I don't raku that much and most of the time, i read the doc more than i
actually write code but when it's writen, it's always elegant and
concise the way i never seen before.
> Maybe perl6 is still not
hello William,
> method col:sym ($/) { make $/.subst(/'""'/, '"', :global).Str }
which is just a longuest version of the line Ralph wrote. i'm inclined
to think that this is easier to read:
method col:sym ($/) { .make ~S:g/'""'/"/ }
> The following line seems to work just fine, with-or-with
hello people,
> I am still defending that we need a package for data
> analysis/science/engineer (like the Perl5 PDL, Python Pandas or R
> data.table) and an IDE for streaming programming like jupyter or rstudio.
I'm still excited about this idea and my offer to test/feedback/document
remains ope
helllo William,
> > Marc wrote:
> > i'm inclined to think that this is easier to read:
> > method col:sym ($/) { .make ~S:g/'""'/"/ }
> That's not working for me. I'm on Moar (2021.06).
works for me with:
Welcome to 𝐑𝐚𝐤𝐮𝐝𝐨™ v2021.09.
Implementing the 𝐑𝐚𝐤𝐮™ programming language v6.d.
> On Sat, Nov 20, 2021 at 9:03 PM Marc Chantreux wrote:
> > > > method col:sym ($/) { .make ~S:g/'""'/"/ }
> > > That's not working for me. I'm on Moar (2021.06).
> > works for me with:
> > method col:sym ($_) { .make: ~S:g
hello William,
> #old:
> rule TOP {* %% \n }
> token line { * %% ',' }
> #new:
> rule TOP {* }
> token line { * %% ',' \n }
ohhh ... indeed! when i fixed the code on Ralph's instructions, i
finally was able to slurp a whole file and discovered a emtpy entry at
the end of the flow
hello people,
long time ago, there was this 'use v6' line so perl should be v6 and
still run v5.* things.
I just took a look to https://raku.land/github:JJ/SDL2 and seen
use v6;
Does it still makes sense?
Regards.
--
Marc Chantreux
Direction du numérique de l'Universit
g your lines, i
realized it's not worth to spare it.
thank you.
regards
marc
--
Marc Chantreux
Direction du numérique de l'Université de Strasbourg
Pôle de Calcul et Services Avancés à la Recherche (CESAR)
http://annuaire.unistra.fr/p/20200
hello rakoons,
I have a script named fixlines which is basically
sub fixline (Str $line) { ... }
say fixline $_ for lines;
This is far enough for personal usage but i would like to release it
so i need a decent -h to be implemented and basically should look
like
Usage:
fixlines [--test]
to
hello Daniel,
> > Did i just dreamed about it ?
> You sort of dreamed it.
damn! thanks for the red pill.
> my $argfiles = IO::ArgFiles.new(@files || '-');
my perl history works against me there: i see @files.elems || '-' here :)
thank you.
> The other change I'd suggest for additional ele
hello people,
I just discovered this this morning:
https://www.reddit.com/r/rakulang/comments/rrcp4c/steal_these_ideas_for_raku_fosdem_talks/
I don't remember if there was a previous annoucement in this list but
it's still possible to jump in.
I just submitted one on "Replacing Bash scripts wit
Le Fri, Dec 31, 2021 at 01:20:45PM +, Wesley Peng a écrit :
> Replacing Bash scripts with Raku? That’s an interesting thing
Well ... replacing bash is always a good thing but raku is not
always the rhs of the substitution (could be dash/mksh/rc,
make/mk, C, ...).
raku is now my tool of choice
hello rakoons,
I got this error message
Too few positionals passed; expected 1 argument but got 0
in sub xxx at - line 1
in block at - line 2
Welcome to 𝐑𝐚𝐤𝐮𝐝𝐨™ v2021.09.
Implementing the 𝐑𝐚𝐤𝐮™ programming language v6.d.
Built on MoarV
Le Sun, Jan 02, 2022 at 12:32:46PM +0100, Elizabeth Mattijsen a écrit :
> Maybe first explain why the error
thanks for the explaination. especially
> $ raku -e 'sub a(|c) { dd c }; a b => 42'
> \(:b(42))
now my sub works the way I wanted:
sub got (|c) {
for c.hash.kv -> $rule ,$inpu
hello rakoons,
AFAIK about raku -n, I need 2 lines to setup a
state with a default value
seq 2| raku -ne '
state (@o, @f);
BEGIN @o = 0 xx 3;
@o.push: "ok";
say @o;
'
but is there a shorter way ?
regards,
marc
say @o;
'
works fine! thank you very much.
--
Marc Chantreux
Direction du numérique de l'Université de Strasbourg
Pôle de Calcul et Services Avancés à la Recherche (CESAR)
http://annuaire.unistra.fr/p/20200
hello,
> Is this a bug, or are my (our?) expectations wrong?
I posted on the list precisely because the doc. wasn't
enough to GTD so I can't reply your question :)
regards
--
Marc Chantreux
Direction du numérique de l'Université de Strasbourg
Pôle de Calcul et Services Avan
he qx construction (something like :r for run).
What I really would like to write is:
raku -e ' qx:r< dpkg-query -f ${db-fsys:Files} -W gnuplot*
>.lines>>.grep(*.IO.f)>>.say '
Any suggestion is welcome.
Regards,
--
Marc Chantreux
Pôle de Calcul et Services Avancés à la Recherche (CESAR)
http://annuaire.unistra.fr/p/20200
Hi Brian and thanks for your reply.
> There is the 'x' adverb for Q -- I think qx is equivalent to Q:x
exactly. that's why Q:x doesn't help as it still run sh -c to execute
the command.
regards,
--
Marc Chantreux
Pôle de Calcul et Services Avancés à la
s =
grep *.IO.f,
map *.trim,
`< dpkg-query -f ${db-fsys:Files} -W gnuplot* >;
insead of
my @installed-files =
grep *.IO.f,
map *.trim,
( run :out, < dpkg-query -f ${db-fsys:Files} -W gnuplot* > ).out.l
the FOSDEM talk:
sub prefix:<`>(|c) is tighter(&infix:<.>) { (run :out, c).out.lines }
the `is tighter` thing was because I hoped I could write something like
`.grep( / '.txt' $ / ).say
Is is something to do to fix it ?
Thanks everything you do on Raku!
regards
--
applications.»
Can anyone give more detail about it?
Thanks for any answer and regards,
PS: sigpipe is also a nice example of usage for INIT and NativeCall.
--
Marc Chantreux
Pôle de Calcul et Services Avancés à la Recherche (CESAR)
http://annuaire.unistra.fr/p/20200
{ say "$_ = $digraph{$_}" for
sort { $digraph{$b} <=> $digraph{$a} }
keys %digraph
}
$_=lc; while (/([a-z]{2})/g) {++$digraph{$1}; --pos; }
'
Any help is very welcome.
regards,
--
Marc Chantreux
Pôle de Calcul et Services Avancés à la Recherche (CESAR)
http://annuaire.unistra.fr/p/20200
match(:exhaustive, /(<[a..z]> ** 2)/)
}).flat.Bag.sort({-.value, .key})' "$@"
raku -e '
lines.race.map({
|map ~*, .lc.match(:exhaustive, /(<[a..z]> ** 2)/)
}).flat.Bag.sort({-.value, .key}).map: &say
'
--
Marc Chantreux
Pôle de Calcul et Services Avancés à la Recherche (CESAR)
http://annuaire.unistra.fr/p/20200
on.
my \path = [ "/var/log/messages" .split: "/" ];
.say for (^path).map( { path[0..$_].join: "/" } )[1..*];
I'm pretty sure I saw a very concise and elegant way to transform
( A B C ) to ((A) (A B) (A B C)) in the past but I'm enable to figure
out how. Any help
lt;<. raku -ne '.Str.say for m:ex{^ [:r "/" <-[/]>+]+? }'
/var/log/messages
and it is pretty good compared to the sed version:
<<. sed -E ':b p; s:/[^/]+$::; t b'
thank you very much to both of you: I learned a lot on this post.
--
Marc Chantreux
Pôle de Calcul et Services Avancés à la Recherche (CESAR)
http://annuaire.unistra.fr/p/20200
On Sat, Sep 03, 2022 at 09:50:08PM +0100, Ralph Mellor wrote:
> > ( A B C ) to ((A) (A B) (A B C)) ?
> [^1,^2,^3]
I got that one and tried to generalize it with something more generic
(using * to get the number of elements).
thanks for helping
--
Marc Chantreux
Pôle de Calcul et
Interesting as it can provide a relative short solution with no advanced
concept. I tried this line but got an immutability problem. I tried
multiple work around with no success for the moment.
<<. raku -e 'lines.IO.map: {repeat {.put} while not .=parent ~~ "/" }'
/var/log
eauty of it. why
made me realize I should take time between two post so I can have a
fresh mindset for all of them!
Actually: this is by far the simplest solution. Thanks.
--
Marc Chantreux
Pôle de Calcul et Services Avancés à la Recherche (CESAR)
http://annuaire.unistra.fr/p/20200
I love this one. I used uniq and run so the whole script can be run from
raku (except the xargs ls avoid the ARG_MAX error)
<<. raku -e 'run < ls -lUd >, unique map {(.IO, *.parent …^ "/")>>.Str.Slip},
lines'
/var/log/messages
/var/log/auth.log
regards
some idoms.
> Is that because it knows me, or has google started blessing Larry's
> neologisms for the whole planet?!? )
Why not? new words happens all the time and those one are useful for
programmers.
--
Marc Chantreux
Pôle de Calcul et Services Avancés à la Recherche (CESAR)
http:/
On Thu, Feb 08, 2024 at 02:25:00PM -0800, ToddAndMargo via perl6-users wrote:
> Actually, I am looking for the name of the calling program:
> Cobian, Task manager, deamon, etc..
linux centric anwser:
raku -e 'say "/proc/{"/proc/$*PID/stat".IO.words[3]}/comm".IO.lin
ar64bang5bar
abar64foo
abar64foo4foo
abar64foo4bar
abar64foo14bar
abar64foo5bar
afoo13 afoo4
>.sort: { | map { +$_ // $_ }, .split: /\d+/, :v }
The ouput seems to be ok.
regards,
--
Marc Chantreux
Pôl
mp;say)
what I would love instead is something closer than the haskell's $
operator with a very low priority so it could be possible to be
parenthesis free.
as example. I would like
1..10 ==> map * * 2 ==> say
to be a joyful version of
(1..10).map(* * 2).say
regards
-
hello,
> ==> sort({ | map { +$_ // $_ }, .split: /\d+/, :v }) ==> say()
ok … so I'm lost but I'm not even curious to understand why (because of
my lack of interest for the ==> operator :))
regards
marc
--
Marc Chantreux
Pôle CESAR (Calcul et services avancés à la re
Hello world,
I never posted here and never contributed to perl6 in any way but i
would like to share my mind about it ...
On Sat, Dec 13, 2008 at 01:34:44PM +1100, Timothy S. Nelson wrote:
> On Sat, 13 Dec 2008, howard chen wrote:
> What I think is more likely to happen in reality is that
hello,
this is a simple code i wrote for test:
-
my %foo = < a 12 b 34 c 45 >;
my @a = < a >;
my $c = 'c';
say %foo.keys.join('/'); # b/c/a
say @a[0];# a
say %foo<< @a[0] $c >>.join('/');
-
on the last line, i expected: '12/45' but had
# stdout: /45
# stderr: Us
hello all,
In my work, there is a lot of code that can be done in perl6 but at the
end of the process, the data must be passed to a perl5 script.
Is there a binary format that perl5 and perl6 can share ? i imagine
that Storable can work ? is there an implementation ?
regards
marc
x.map({ abs golden - $_ });
which is not so appealing.
then my programs starts to burn cpu and gets nothing. this is because it
seems that gather isn't on demand so i moved the subscript [^1000]. this
works but isn't intellectually right anymore.
any idea to make it more appealing ?
regard
: (golden - *).abs;
> say distances[^1000];
excellent! i updated my perl6 and tested this code and it works well!
thank you everyone.
--
Marc Chantreux (eiro on github and freenode)
http://eiro.github.com/
http://eiro.github.com/atom.xml
"Don't believe everything you read on the Internet"
-- Abraham Lincoln
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/
http://eiro.github.com
meone wants to help us, everyone is very welcome.
just subcribe to this list:
https://framalistes.org/sympa/info/sympa-20th-birthday-hackathon
regards
--
Marc Chantreux (eiro on github and freenode)
http://eiro.github.com/
http://eiro.github.com/atom.xml
"Don't believe everything you read
h the readable one :)
thanks for help
regards
--
Marc Chantreux (eiro on github and freenode)
http://eiro.github.com/
http://eiro.github.com/atom.xml
"Don't believe everything you read on the Internet"
-- Abraham Lincoln
tually built stuff but at the end, perl6 -v still gives me 2017.05.
any idea ?
regards
marc
--
Marc Chantreux (eiro on github and freenode)
http://eiro.github.com/
http://eiro.github.com/atom.xml
"Don't believe everything you read on the Internet"
-- Abraham Lincoln
m almost
there:
(116, * * .6 ... * < 2 ).say
but the first $_ < 2 remains in the list. the only one alternative i see
is a gather/take loop but i really expect something shorter from perl6
:)
any idea ?
regards
--
Marc Chantreux (eiro on github and freenode)
http://eiro.gi
1 - 100 of 153 matches
Mail list logo
