The SF Perl Raku Study Group, 05/19 at 1pm PDT

2024-05-17 Thread Joseph Brenner
John Keats, "Endymion" (1818): "Therefore, on every morrow, are we wreathing A flowery band to bind us to the earth, Spite of despondence, of the inhuman dearth Of noble natures, of the gloomy days, Of all the unhealthy and o'er-darkened ways Made for our searching ... " The Raku Study Group

Re: PostgreSQL: Raku as a "trusted" language?

2024-05-15 Thread JJ Merelo
El mié, 15 may 2024 a las 21:08, William Michels () escribió: > Thanks for your response, JJ. > > I'm wondering if the "trusted" moniker is conferred when a > (specified/bespoke) language version sufficiently sanitizes input? > Not only that, also output to the filesystem and network. > > If

Re: PostgreSQL: Raku as a "trusted" language?

2024-05-15 Thread William Michels via perl6-users
Thanks for your response, JJ. I'm wondering if the "trusted" moniker is conferred when a (specified/bespoke) language version sufficiently sanitizes input? If so, your Unicode::Security module would seem to be right on the mark: https://raku.land/zef:jjmerelo/Unicode::Security

annoucements page on website

2024-05-13 Thread Richard Hainsworth
Hi all, We've added a new announcements page to the Raku documentation website. As soon as the changes propage through the tool chain - probably after about 10.30am UTC - whenever you open the website after a new announcement has been made that you have not read, you will get a popup of the

EBook of documentation

2024-05-09 Thread Richard Hainsworth
Hi to everyone. We have reformatted all the documentation into an EBook! It is now available from the docs.raku.org website. Click on More, then EBook, read the popup and download the book. THIS IS A FIRST DRAFT, so there's things wrong and help is needed to get it right. Why have EBook?

Re: Array remove duplicates question

2024-05-06 Thread ToddAndMargo via perl6-users
On 5/6/24 05:45, yary wrote: I thought you wanted them sorted also? [1] > (8,7,6,7,5,4,2,1).unique (8 7 6 5 4 2 1) [2] > (8,7,6,7,5,4,2,1).unique.sort (1 2 4 5 6 7 8) -y Hi Yary, Not in this instance. But the the command is really sweet. Thank you! This time I am going the extract IP

Re: Array remove duplicates question

2024-05-06 Thread yary
I thought you wanted them sorted also? [1] > (8,7,6,7,5,4,2,1).unique (8 7 6 5 4 2 1) [2] > (8,7,6,7,5,4,2,1).unique.sort (1 2 4 5 6 7 8) -y On Mon, May 6, 2024 at 6:15 AM ToddAndMargo via perl6-users < perl6-users@perl.org> wrote: > On 5/6/24 03:07, ToddAndMargo via perl6-users wrote: > > >

Re: Array remove duplicates question

2024-05-06 Thread ToddAndMargo via perl6-users
On 5/6/24 03:07, ToddAndMargo via perl6-users wrote: On 6 May 2024, at 04:35, ToddAndMargo via perl6-users wrote: Hi All, I have thought of how to do it and pretty sure it would work, but just in case Raku have one of those sweet utilities, does Raku have a utility that will take an array

Re: Array remove duplicates question

2024-05-06 Thread ToddAndMargo via perl6-users
On 6 May 2024, at 04:35, ToddAndMargo via perl6-users wrote: Hi All, I have thought of how to do it and pretty sure it would work, but just in case Raku have one of those sweet utilities, does Raku have a utility that will take an array and remove all the duplicates and rearrange the cells

Re: Array remove duplicates question

2024-05-06 Thread Elizabeth Mattijsen
$ raku -e 'my @a = 1,2,3,6,7,1,2,8; @a .= unique; say @a' [1 2 3 6 7 8] https://docs.raku.org/type/Any#method_unique > On 6 May 2024, at 04:35, ToddAndMargo via perl6-users > wrote: > > Hi All, > > I have thought of how to do it and pretty sure > it would work, but just in case Raku have one

Re: Need regex ^? help

2024-05-06 Thread ToddAndMargo via perl6-users
This is what I have so far. my $x=" 1.2.3.4:12345 "; $x = $x.trim; $x~~s/(.*'.') .*/$0$(Q[0/24])/; say "<$x>"; <1.2.3.0/24> It works. Is there a way to petty it up with ^ and $ ?

Array remove duplicates question

2024-05-05 Thread ToddAndMargo via perl6-users
Hi All, I have thought of how to do it and pretty sure it would work, but just in case Raku have one of those sweet utilities, does Raku have a utility that will take an array and remove all the duplicates and rearrange the cells back in order? Many thanks, -T

The SF Perl Raku Study Group, 05/05 at 1pm PDT

2024-05-04 Thread Joseph Brenner
"Social theory is largely a game of make-believe in which we pretend, just for the sake of argument, that there's just one thing going on: essentially, we reduce everything to a cartoon so as to be able to detect patterns that would be otherwise invisible. As a result, all real progress in social

Re: Need regex ^? help

2024-04-29 Thread ToddAndMargo via perl6-users
On 4/29/24 17:57, Patrick R. Michaud wrote: Perhaps not really what you're intending, but here's how I'd start: $ raku -e 'my $x="1.2.3.4"; $x ~~ s!\d+$!0/24!; say $x;' 1.2.3.0/24 The pattern part of the substitution matches all of the digits at the end of the string (\d+$), then

Re: Need regex ^? help

2024-04-29 Thread Patrick R. Michaud
Perhaps not really what you're intending, but here's how I'd start: $ raku -e 'my $x="1.2.3.4"; $x ~~ s!\d+$!0/24!; say $x;' 1.2.3.0/24 The pattern part of the substitution matches all of the digits at the end of the string (\d+$), then replaces them with the string "0/24". Everything

Re: Need regex ^? help

2024-04-29 Thread ToddAndMargo via perl6-users
On 4/29/24 17:42, ToddAndMargo via perl6-users wrote: Hi All, I thought I understood ^ and ? used in a regex'es, but I don't. ^ means from the beginning and ? from the end. I am trying to put together an example of how to use them: I have    1.2.3.4 I want    1.2.3.0/24 So Far I have

Need regex ^? help

2024-04-29 Thread ToddAndMargo via perl6-users
Hi All, I thought I understood ^ and ? used in a regex'es, but I don't. ^ means from the beginning and ? from the end. I am trying to put together an example of how to use them: I have 1.2.3.4 I want 1.2.3.0/24 So Far I have (not working): raku -e 'my $x="1.2.3.4"; $x~~s/ (.*)

Re: Is irc.libera.chat down?

2024-04-19 Thread ToddAndMargo via perl6-users
A sex, 19-04-2024 às 03:09 -0700, Todd Chester via perl6-users escreveu: A sex, 19-04-2024 às 02:36 -0700, Todd Chester via perl6-users escreveu: Hi All, Is https://kiwiirc.com/nextclient/irc.libera.chat/#raku down? -T On 4/19/24 03:03, David Santiago wrote:  >  > It works for me.

Re: Is irc.libera.chat down?

2024-04-19 Thread David Santiago
Do you have any adblocker or any extension that blocks js? If so try to disable it. You can also use a dedicated client instead of the browser: www.mirc.com (for windows) or https://hexchat.github.io/ (for windows and linux). Regards, David Santiago A sex, 19-04-2024 às 03:09 -0700, Todd

Re: Is irc.libera.chat down?

2024-04-19 Thread Todd Chester via perl6-users
On 4/19/24 03:09, Todd Chester via perl6-users wrote: A sex, 19-04-2024 às 02:36 -0700, Todd Chester via perl6-users escreveu: Hi All, Is https://kiwiirc.com/nextclient/irc.libera.chat/#raku down? -T On 4/19/24 03:03, David Santiago wrote: > > It works for me. > > Regards, >

Re: Is irc.libera.chat down?

2024-04-19 Thread Todd Chester via perl6-users
A sex, 19-04-2024 às 02:36 -0700, Todd Chester via perl6-users escreveu: Hi All, Is     https://kiwiirc.com/nextclient/irc.libera.chat/#raku down? -T On 4/19/24 03:03, David Santiago wrote: > > It works for me. > > Regards, > David > Hi David, The circle just goes round and round and

Re: Is irc.libera.chat down?

2024-04-19 Thread David Santiago
It works for me. Regards, David A sex, 19-04-2024 às 02:36 -0700, Todd Chester via perl6-users escreveu: > Hi All, > > Is >     https://kiwiirc.com/nextclient/irc.libera.chat/#raku > down? > > -T

Is irc.libera.chat down?

2024-04-19 Thread Todd Chester via perl6-users
Hi All, Is https://kiwiirc.com/nextclient/irc.libera.chat/#raku down? -T

Re: need native call help

2024-04-19 Thread Todd Chester via perl6-users
On 4/18/24 04:50, yary wrote: I did a lot of very deep windows programming in my previous job and reminding me that I would always use the 8.3 short name for file operations! dir /x will get it for you. Must be API called for it also. Probably only works on local volumes not network rounded

The SF Perl Raku Study Group, 04/21 at 1pm PDT

2024-04-18 Thread Joseph Brenner
"The dilemma of the critic has always been that if he knows enough to speak with authority, he knows too much to speak with detachment." -- Raymond Chandler, "A Qualified Farewell" (early 1950's) The Raku Study Group April 21, 2024 1pm in California, 8pm in the UK An informal

Re: need native call help

2024-04-18 Thread yary
I did a lot of very deep windows programming in my previous job and reminding me that I would always use the 8.3 short name for file operations! dir /x will get it for you. Must be API called for it also. Probably only works on local volumes not network rounded ones. Just a guess. I've run into

Re: need native call help

2024-04-17 Thread ToddAndMargo via perl6-users
On 4/17/24 19:10, William Michels via perl6-users wrote: Hi Todd, Here are a few U StackExchange answers that I wrote using Raku's `unlink`: https://unix.stackexchange.com/questions/459521/how-to-truncate-file-to-maximum-number-of-characters-not-bytes/751267#751267

Perl and Raku Conference, late June, Las Vegas

2024-04-17 Thread Bruce Gray
In case you had not heard, Raku content will (unsurprisingly) be part of The Perl and Raku Conference, June 24th through 28th in Las Vegas. (Come to think of it, if you hadn't heard about this conference *at* *all*, and you are a Raku user, please email me personally, so we will know in the

Re: need native call help

2024-04-17 Thread William Michels via perl6-users
Hi Todd, Here are a few U StackExchange answers that I wrote using Raku's `unlink`: https://unix.stackexchange.com/questions/459521/how-to-truncate-file-to-maximum-number-of-characters-not-bytes/751267#751267

Re: need native call help

2024-04-17 Thread ToddAndMargo via perl6-users
On 4/17/24 05:52, yary wrote: From unlink's documentation: If the file to be deleted does not exist, the routine treats it as success. So trying to delete a file that isn't there, doesn't have an error, which is kind of neat, but that is a difference from native delete. -y Hi Yary, Not

Re: need native call help

2024-04-17 Thread ToddAndMargo via perl6-users
On 4/17/24 05:52, yary wrote: From unlink's documentation: If the file to be deleted does not exist, the routine treats it as success. So trying to delete a file that isn't there, doesn't have an error, which is kind of neat, but that is a difference from native delete. -y Hi Yary, Not

Re: need native call help

2024-04-17 Thread ToddAndMargo via perl6-users
On 4/17/24 05:50, yary wrote: What does the windows native delete do which you need, that raku's unlink doesn't have? without unlink $FileName { say "Could not delete $FileName:", .exception.message }; -y Hi Yary, This is Windows we are dealing with. It is a kluge. I have had unlink

Re: PostgreSQL: Raku as a "trusted" language?

2024-04-17 Thread JJ Merelo
>From what I'm seeing, my impression is that you need to create a specific version, possibly with Pg bindings, to become either trusted or untrusted; there's no Trusted "node" (or bun, for that matter), but a "v8js" version of JavaScript. Any PL (procedural language) version of the language would

PostgreSQL: Raku as a "trusted" language?

2024-04-17 Thread William Michels via perl6-users
Hi, Thinking about which database to use with Raku, I started following a question from StackOverflow--here: "list of PostgreSQL trusted languages?" https://dba.stackexchange.com/questions/156631/list-of-postgresql-trusted-languages From that page I learned that there are both "trusted" and

Re: need native call help

2024-04-17 Thread yary
>From unlink's documentation: If the file to be deleted does not exist, the routine treats it as success. So trying to delete a file that isn't there, doesn't have an error, which is kind of neat, but that is a difference from native delete. -y On Wed, Apr 17, 2024 at 8:50 AM yary wrote: >

Re: need native call help

2024-04-17 Thread yary
What does the windows native delete do which you need, that raku's unlink doesn't have? without unlink $FileName { say "Could not delete $FileName:", .exception.message }; -y On Wed, Apr 17, 2024 at 2:29 AM ToddAndMargo via perl6-users < perl6-users@perl.org> wrote: > On 4/16/24 23:25,

Re: need native call help

2024-04-17 Thread ToddAndMargo via perl6-users
On 4/16/24 23:25, ToddAndMargo via perl6-users wrote: `\\>\` should have been `\\?\`

Re: need native call help

2024-04-17 Thread ToddAndMargo via perl6-users
On 4/16/24 20:57, ToddAndMargo via perl6-users wrote:    $LongName = $FileName;    if $FileName.chars >= MAX_PATH  { $LongName = Q[\\?\] ~ $FileName; } What the about is all about is that MAX_PATH, which limits the file name to 260 characters, can go up to 32,767 wide characters, prepend

Re: need native call help

2024-04-16 Thread ToddAndMargo via perl6-users
On 4/16/24 18:43, ToddAndMargo via perl6-users wrote: On 4/16/24 01:21, ToddAndMargo via perl6-users wrote: Hi All, Windows 11 It has been so long that I have done one of these that my brain is seizing. https://learn.microsoft.com/en-us/windows/win32/api/fileapi/nf-fileapi-deletefilea C++

Re: need native call help

2024-04-16 Thread ToddAndMargo via perl6-users
On 4/16/24 01:21, ToddAndMargo via perl6-users wrote: Hi All, Windows 11 It has been so long that I have done one of these that my brain is seizing. https://learn.microsoft.com/en-us/windows/win32/api/fileapi/nf-fileapi-deletefilea C++ BOOL DeleteFileA(   [in] LPCSTR lpFileName ); Would

need native call help

2024-04-16 Thread ToddAndMargo via perl6-users
Hi All, Windows 11 It has been so long that I have done one of these that my brain is seizing. https://learn.microsoft.com/en-us/windows/win32/api/fileapi/nf-fileapi-deletefilea C++ BOOL DeleteFileA( [in] LPCSTR lpFileName ); Would some kind soul please show me how to do this again?

The SF Perl Raku Study Group, 04/07 at 1pm PDT

2024-04-06 Thread Joseph Brenner
"I do not think that society ought to maltreat men of genius as it has done hitherto; but neither do I think it should indulge them too far, still less accord them any privileges or exclusive rights whatsoever; and that for three reasons: first, because it would often mistake a charlatan for a man

The SF Perl Raku Study Group, 03/34 at 1pm PDT

2024-03-22 Thread Joseph Brenner
Margaret Masterman, "The Nature of a Paradigm" (1970): "This pre-scientific and philosophic state of affairs sharply contrasts, however, with *multi-paradigm science*, with that state of affairs in which, far from there being no paradigm, there are on the contrary too many. (This

Re: I need sorting help

2024-03-16 Thread ToddAndMargo via perl6-users
On 3/2/24 05:13, Elizabeth Mattijsen wrote: $ raku -e '.say for .sort(*.split(/\d+/, :kv).map({ (try .Numeric) // $_}).List) afoo2 afoo12 On 2 Mar 2024, at 07:26, ToddAndMargo via perl6-users wrote: Hi All, @Sorted_List = @Sorted_List.sort: { .comb(/ \d+ | \D+ /) .map({ .Int // .self

Re: MAIN(*magic)

2024-03-15 Thread Bruce Gray
> On Mar 14, 2024, at 21:57, Mark Devine wrote: > > Rakoons, > > I keep running into a space with Raku where it would be nice to have some > magic to reduce boilerplate. I often make roles & classes with interface > options that flow from a consuming script’s MAIN arguments, then the

Re: MAIN(*magic)

2024-03-15 Thread Elizabeth Mattijsen
> On 15 Mar 2024, at 03:57, Mark Devine wrote: > > Rakoons, > I keep running into a space with Raku where it would be nice to have some > magic to reduce boilerplate. I often make roles & classes with interface > options that flow from a consuming script’s MAIN arguments, then the first >

MAIN(*magic)

2024-03-14 Thread Mark Devine
Rakoons, I keep running into a space with Raku where it would be nice to have some magic to reduce boilerplate. I often make roles & classes with interface options that flow from a consuming script’s MAIN arguments, then the first bit of code at the top the MAIN block, then into

Re: I need sorting help

2024-03-09 Thread Ralph Mellor
On Sat, Mar 9, 2024 at 7:52 PM yary wrote: > how to sort by alpha & numeric segments (b3b, a1a, c20c) => (a1a, b3b, c2c) Ahhh. D'oh. Thanks!  Now I see what was required, or at least think I do: .sort: {m:g/ \d+{make +$/} | \D+{make ~$/} /».made} That does what was meant, right? -- love,

Re: I need sorting help

2024-03-09 Thread yary
Using my quick-intuition, are these methods sorting on the earliest number withing the string, ignoring the non-digits? $ raku -e '.say for .sort: {m/ \d+ /.Int}' $ raku -e '.say for .sort: +*.match: / \d+ /' let's see $ raku -e '.say for .sort: {m/ \d+ /.Int}' it1 does2 not3 matter10 what20

Re: The SF Perl Raku Study Group, 04/10 at 1pm Pacific Time

2024-03-07 Thread Joseph Brenner
And this: > March 10th, 2024 1pm in California, 9pm in the UK Should've read "8pm in the UK". On 3/7/24, Joseph Brenner wrote: > Note: Here in the US, we are about to "spring ahead" one mooorre time, > and the 1pm I'm referring to is an hour earlier than many of you expect. > >"It's

The SF Perl Raku Study Group, 04/10 at 1pm Pacific Time

2024-03-07 Thread Joseph Brenner
Note: Here in the US, we are about to "spring ahead" one mooorre time, and the 1pm I'm referring to is an hour earlier than many of you expect. "It's becoming increasingly unusual to read a report of a new technology or scientific discovery that doesn't breathlessly use the phrase 'it

Re: I need sorting help

2024-03-07 Thread Ralph Mellor
On Tue, Mar 5, 2024 at 7:01 AM ToddAndMargo via perl6-users wrote: > >> $ raku -e '.say for .sort(*.split(/\d+/, :kv).map({ > >> (try .Numeric) // $_}).List)' > >> > >> Yippee! > > raku -e '.say for .sort: { .comb(/ \d+ | \D+ /).map({ > > .Int // .self }).cache };' > > Awesome! Now I have

Re: pint: Elizabeth, sort list???

2024-03-07 Thread Marc Chantreux
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 recherche) Université de

Re: pint: Elizabeth, sort list???

2024-03-07 Thread Fernando Santagata
Hi Marc, This works: ==> sort({ | map { +$_ // $_ }, .split: /\d+/, :v }) ==> say() As the documentation says here https://docs.raku.org/routine/%3D%3D%26gt%3B The precedence is very loose so you will need to use parentheses to assign the result On Thu, Mar 7, 2024 at 8:37 AM Marc

Re: pint: Elizabeth, sort list???

2024-03-07 Thread Marc Chantreux
hello, > How would you write that expression using the feed operator? I tried < afoo12 afoo2 > ==> {.sort: { | map { +$_ // $_ }, .split: /\d+/, :v }} ==> {map } and the error message is really interesting Only routine calls or variables that can '.append' may

Re: pint: Elizabeth, sort list???

2024-03-06 Thread Jim Bollinger
Hi Elizabeth! How would you write that expression using the feed operator? Thanks, Shimon > On Mar 3, 2024, at 7:22 AM, Elizabeth Mattijsen wrote: > >> On 3 Mar 2024, at 03:32, ToddAndMargo via perl6-users >> wrote: >> >>> On 3/2/24 05:13, Elizabeth Mattijsen wrote:

Re: pint: Elizabeth, sort list???

2024-03-05 Thread Marc Chantreux
Hi rakoons, On Sun, Mar 03, 2024 at 01:22:45PM +0100, Elizabeth Mattijsen wrote: > Actually, the expression can be refined a bit: > > say .sort(*.split(/\d+/, :v).map({ (try .Int) // $_}).List) Which is gorgeous! thanks for that. I read the documentation which is clear about all the magic in

Re: I need sorting help

2024-03-04 Thread ToddAndMargo via perl6-users
On 3/4/24 23:01, ToddAndMargo via perl6-users wrote: No I have Sould have been Now I have

Re: I need sorting help

2024-03-04 Thread ToddAndMargo via perl6-users
On 3/4/24 22:09, Bruce Gray wrote: On Mar 4, 2024, at 15:55, ToddAndMargo via perl6-users wrote: --snip-- $ raku -e '.say for .sort(*.split(/\d+/, :kv).map({ (try .Numeric) // $_}).List)' bk1 bk2 bk10 bk34 Yippee! tony@rn6:/home/linuxutil1$ raku -e '.say for .sort: { .comb(/ \d+ |

Re: I need sorting help

2024-03-04 Thread Bruce Gray
> On Mar 4, 2024, at 15:55, ToddAndMargo via perl6-users > wrote: --snip-- > $ raku -e '.say for .sort(*.split(/\d+/, :kv).map({ (try > .Numeric) // $_}).List)' > bk1 > bk2 > bk10 > bk34 > > Yippee! > > > tony@rn6:/home/linuxutil1$ raku -e '.say for .sort: { > .comb(/ \d+ | \D+ /)

Re: I need sorting help

2024-03-04 Thread ToddAndMargo via perl6-users
On 3/4/24 13:55, ToddAndMargo via perl6-users wrote: On 3/4/24 12:40, Ralph Mellor wrote: On Sat, Mar 2, 2024 at 6:26 AM ToddAndMargo via perl6-users wrote: @Sorted_List = @Sorted_List.sort: { .comb(/ \d+ | \D+ /) .map({ .Int // .self })}; In case another answer is helpful... First, a

Re: I need sorting help

2024-03-04 Thread ToddAndMargo via perl6-users
On 3/4/24 12:40, Ralph Mellor wrote: On Sat, Mar 2, 2024 at 6:26 AM ToddAndMargo via perl6-users wrote: @Sorted_List = @Sorted_List.sort: { .comb(/ \d+ | \D+ /) .map({ .Int // .self })}; In case another answer is helpful... First, a simplified sort that produces the same result as your

Re: I need sorting help

2024-03-04 Thread Ralph Mellor
> @Sorted_List .= sort: *.match: / \d+ /; > ... > @Sorted_List .= sort: +*.match: / \d+ /; Or perhaps easier to understand: @Sorted_List .= sort: {m/ \d+ /.Str} vs @Sorted_List .= sort: {m/ \d+ /.Int} love, raiph

Re: I need sorting help

2024-03-04 Thread Ralph Mellor
On Sat, Mar 2, 2024 at 6:26 AM ToddAndMargo via perl6-users wrote: > > @Sorted_List = @Sorted_List.sort: { .comb(/ \d+ | \D+ /) .map({ .Int // .self > })}; In case another answer is helpful... First, a simplified sort that produces the same result as your code above: @Sorted_List .= sort:

Re: missing block

2024-03-03 Thread ToddAndMargo via perl6-users
On 3/3/24 04:25, Elizabeth Mattijsen wrote: On 3 Mar 2024, at 05:12, ToddAndMargo via perl6-users wrote: $ raku -I./ -c CobianWrapper.pl6 Missing block at /home/CDs/Windows/NtUtil/CobianWrapper.pl6:1000 1000 is the last line in my code. I presume by "block" they mean something like "]" or

Re: pint: Elizabeth, sort list???

2024-03-03 Thread Elizabeth Mattijsen
> On 3 Mar 2024, at 03:32, ToddAndMargo via perl6-users > wrote: > >> On 3/2/24 05:13, Elizabeth Mattijsen wrote: >>> .sort(*.split(/\d+/, :kv).map({ (try .Numeric) // $_}).List) > >> Hi Elizabeth, >> It works perfectly. Thank you! >> I have no idea why, I will ask you in another post > Would

Re: missing block

2024-03-02 Thread ToddAndMargo via perl6-users
On 3/2/24 20:12, ToddAndMargo via perl6-users wrote: Hi All, $ raku -I./ -c CobianWrapper.pl6 Missing block at /home/CDs/Windows/NtUtil/CobianWrapper.pl6:1000 1000 is the last line in my code.  I presume by "block" they mean something like "]" or "}" Do I really have to read 1000 lines of

missing block

2024-03-02 Thread ToddAndMargo via perl6-users
Hi All, $ raku -I./ -c CobianWrapper.pl6 Missing block at /home/CDs/Windows/NtUtil/CobianWrapper.pl6:1000 1000 is the last line in my code. I presume by "block" they mean something like "]" or "}" Do I really have to read 1000 lines of code to find my screw up? Anyone have a tip on how to

Re: pint: Elizabeth, sort list???

2024-03-02 Thread ToddAndMargo via perl6-users
On 3/2/24 19:14, Clifton Wood wrote: .sort(*.split(/\d+/, :kv).map({ (try .Numeric) // $_}).List) Can you take apart the above for me?

Re: ping: Elizabeth, sort list???

2024-03-02 Thread ToddAndMargo via perl6-users
Sorry, that was suppose to be "ping: not "pint:

Re: pint: Elizabeth, sort list???

2024-03-02 Thread Clifton Wood
https://gist.github.com/Xliff/286f1359e40d192d724ed9b900354015 On Sat, Mar 2, 2024 at 9:32 PM ToddAndMargo via perl6-users < perl6-users@perl.org> wrote: > > On 3/2/24 05:13, Elizabeth Mattijsen wrote: > >> .sort(*.split(/\d+/, :kv).map({ (try .Numeric) // > $_}).List) > > > Hi Elizabeth, > > >

Re: I need sorting help

2024-03-02 Thread Clifton Wood
Easy multisort! my @h = ( { name => "albert", age => 40, size => 2 }, { }, { ); # ({age => 40, name => albert, size => 2} {age => 69, name => albert, size => 3} {age => 22, name => andy, size => 3}) On Sat, Mar 2, 2024 at 9:29 PM ToddAndMargo via perl6-users < perl6-users@perl.org> wrote:

pint: Elizabeth, sort list???

2024-03-02 Thread ToddAndMargo via perl6-users
On 3/2/24 05:13, Elizabeth Mattijsen wrote: .sort(*.split(/\d+/, :kv).map({ (try .Numeric) // $_}).List) Hi Elizabeth, It works perfectly. Thank you! I have no idea why, I will ask you in another post Hi Elizabeth, Would you take apart your sort piece by piece and explain each part?

Re: I need sorting help

2024-03-02 Thread ToddAndMargo via perl6-users
On 3/2/24 05:13, Elizabeth Mattijsen wrote: .sort(*.split(/\d+/, :kv).map({ (try .Numeric) // $_}).List) Hi Elizabeth, It works perfectly. Thank you! I have no idea why, I will ask you in another post -T

RE: I need sorting help

2024-03-02 Thread Mark Devine
Elizabeth, I have been looking for that one to sort operating system devices. Exceptional timing! Thanks, Mark Devine (202) 878-1500 -Original Message- From: Elizabeth Mattijsen Sent: Saturday, March 2, 2024 8:14 AM To: ToddAndMargo via perl6-users Subject: Re: I need sorting help

Re: I need sorting help

2024-03-02 Thread Elizabeth Mattijsen
$ raku -e '.say for .sort(*.split(/\d+/, :kv).map({ (try .Numeric) // $_}).List) afoo2 afoo12 > On 2 Mar 2024, at 07:26, ToddAndMargo via perl6-users > wrote: > > Hi All, > > @Sorted_List = @Sorted_List.sort: { .comb(/ \d+ | \D+ /) .map({ .Int // .self > })}; > > gives me > > Element

I need sorting help

2024-03-01 Thread ToddAndMargo via perl6-users
Hi All, @Sorted_List = @Sorted_List.sort: { .comb(/ \d+ | \D+ /) .map({ .Int // .self })}; gives me Element [0] Element [1] Element [2] Element [3] Element [4] Element [5] Element [6] Element [7] Element [8] Element [9] I need it to say

Re: disable coercing?

2024-02-26 Thread ToddAndMargo via perl6-users
On 2/25/24 17:45, Joseph Brenner wrote: Would this trick help? You can define a "subset" that restricts values to the uint16 range: my subset FussyUint16 of Int where 0 ..^ 2¹⁶; my FussyUint16 $x; $x = -1; ## Type check failed in assignment to $x; expected FussyUint16

Re: disable coercing?

2024-02-25 Thread Joseph Brenner
Would this trick help? You can define a "subset" that restricts values to the uint16 range: my subset FussyUint16 of Int where 0 ..^ 2¹⁶; my FussyUint16 $x; $x = -1; ## Type check failed in assignment to $x; expected FussyUint16 but got Int (-1)

The SF Perl Raku Study Group, 02/25 at 1pm PDT

2024-02-23 Thread Joseph Brenner
"Over the years, executives have backed their desire to eliminate programmers with staggering funds. Dozens of simplistic schemes have been heaped with money and praise on the promise-- as yet not kept-- of going directly from sales proposal to a working data-processing system. But

Re: pm6 naming convention

2024-02-12 Thread ToddAndMargo via perl6-users
On 2/12/24 15:04, Will Coleda wrote: On Mon, Feb 12, 2024 at 5:32 PM ToddAndMargo via perl6-users mailto:perl6-users@perl.org>> wrote: On 2/12/24 14:29, ToddAndMargo via perl6-users wrote: >>> On Mon, Feb 12, 2024 at 3:24 PM ToddAndMargo via perl6-users >>>

Re: pm6 naming convention

2024-02-12 Thread ToddAndMargo via perl6-users
On 2/12/24 15:04, Will Coleda wrote: Pull requests welcome, and if you have any specific notes about searches that aren't working for you, please report them on https://github.com/Raku/doc/issues . You can click on the edit icon on that doc page to easily

Re: pm6 naming convention

2024-02-12 Thread Will Coleda
On Mon, Feb 12, 2024 at 5:32 PM ToddAndMargo via perl6-users < perl6-users@perl.org> wrote: > On 2/12/24 14:29, ToddAndMargo via perl6-users wrote: > >>> On Mon, Feb 12, 2024 at 3:24 PM ToddAndMargo via perl6-users > >>> mailto:perl6-users@perl.org>> wrote: > >> > >>> Has .pl6 been renamed

Re: pm6 naming convention

2024-02-12 Thread ToddAndMargo via perl6-users
On 2/12/24 14:29, ToddAndMargo via perl6-users wrote: On Mon, Feb 12, 2024 at 3:24 PM ToddAndMargo via perl6-users mailto:perl6-users@perl.org>> wrote:     Has .pl6 been renamed too? On 2/12/24 12:37, Will Coleda wrote: > Please see: https://docs.raku.org/language/filename-extensions >

Re: pm6 naming convention

2024-02-12 Thread ToddAndMargo via perl6-users
On Mon, Feb 12, 2024 at 3:24 PM ToddAndMargo via perl6-users mailto:perl6-users@perl.org>> wrote: Has .pl6 been renamed too? On 2/12/24 12:37, Will Coleda wrote: > Please see: https://docs.raku.org/language/filename-extensions > >

Re: pm6 naming convention

2024-02-12 Thread Will Coleda
Please see: https://docs.raku.org/language/filename-extensions On Mon, Feb 12, 2024 at 3:24 PM ToddAndMargo via perl6-users < perl6-users@perl.org> wrote: > > >> On 12 Feb 2024, at 20:34, ToddAndMargo via perl6-users < > perl6-users@perl.org> wrote: > >> > >> > On 6 Feb 2024, at 18:08,

Re: pm6 naming convention

2024-02-12 Thread ToddAndMargo via perl6-users
On 12 Feb 2024, at 20:34, ToddAndMargo via perl6-users wrote: On 6 Feb 2024, at 18:08, ToddAndMargo via perl6-users wrote: Hi All, I use AnyDesk for remoter customer support. Work rather well. The file transfer portion, which I adore, posts a Microsoft Office Publisher Icon (a big

Re: pm6 naming convention

2024-02-12 Thread Elizabeth Mattijsen
It's been marked as DEPRECATED since 2023.12 I believe. > On 12 Feb 2024, at 20:34, ToddAndMargo via perl6-users > wrote: > > >>> On 6 Feb 2024, at 18:08, ToddAndMargo via perl6-users >>> wrote: >>> >>> Hi All, >>> >>> I use AnyDesk for remoter customer support. Work rather well. >>>

Re: pm6 naming convention

2024-02-12 Thread ToddAndMargo via perl6-users
On 6 Feb 2024, at 18:08, ToddAndMargo via perl6-users wrote: Hi All, I use AnyDesk for remoter customer support. Work rather well. The file transfer portion, which I adore, posts a Microsoft Office Publisher Icon (a big one) when it hits a .pm6 modules. Is there a different naming

Re: pm6 naming convention

2024-02-12 Thread Elizabeth Mattijsen
.rakumod > On 6 Feb 2024, at 18:08, ToddAndMargo via perl6-users > wrote: > > Hi All, > > I use AnyDesk for remoter customer support. Work rather well. > > The file transfer portion, which I adore, posts a Microsoft > Office Publisher Icon (a big one) when it hits a .pm6 modules. > > Is

Re: who call raku?

2024-02-10 Thread ToddAndMargo via perl6-users
On 2/10/24 16:01, ToddAndMargo via perl6-users wrote: On 2/10/24 15:26, Marc Chantreux wrote: 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:

Re: who call raku?

2024-02-10 Thread ToddAndMargo via perl6-users
On 2/10/24 15:26, Marc Chantreux wrote: 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

Re: who call raku?

2024-02-10 Thread Marc Chantreux
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.lines[0]' hth -- Marc Chantreux

Re: disable coercing?

2024-02-10 Thread ToddAndMargo via perl6-users
On 2/10/24 02:41, Elizabeth Mattijsen wrote: On 10 Feb 2024, at 08:56, ToddAndMargo via perl6-users wrote: Hi All, Is there a switch to tell Raku to bomb out with a type mismatch rather than coercing the following? my uint16 $x = -1 65535 No, this is intentional behaviour on native

Re: disable coercing?

2024-02-10 Thread Elizabeth Mattijsen
> On 10 Feb 2024, at 08:56, ToddAndMargo via perl6-users > wrote: > > Hi All, > > Is there a switch to tell Raku to bomb out with a > type mismatch rather than coercing the following? > > > my uint16 $x = -1 > 65535 No, this is intentional behaviour on native integers. Note that you can

disable coercing?

2024-02-09 Thread ToddAndMargo via perl6-users
Hi All, Is there a switch to tell Raku to bomb out with a type mismatch rather than coercing the following? > my uint16 $x = -1 65535 Many thanks, -T -- If I had a dime every time I didn't know what was going on, I'd be like, "Why is everyone giving

Re: who call raku?

2024-02-08 Thread ToddAndMargo via perl6-users
On 2/8/24 14:25, ToddAndMargo via perl6-users wrote: On 2/8/24 13:19, Bruce Gray wrote: On Feb 8, 2024, at 15:12, ToddAndMargo via perl6-users wrote: Hi All, Is there one of those fancy system variables that will tell me who called/started raku? Ooops. I should have said "what called"

Re: Session ID

2024-02-08 Thread ToddAndMargo via perl6-users
On 2/6/24 17:50, ToddAndMargo via perl6-users wrote: Hi All Windows 10 and 11 Does Raku have a system call that will tell me my "session ID"? Many thanks, -T So far what I have come up with is a system call to "wmic": >raku -e "sleep 14" >wmic process where "name='raku.exe'" get

Re: who call raku?

2024-02-08 Thread ToddAndMargo via perl6-users
On 2/8/24 13:19, Bruce Gray wrote: On Feb 8, 2024, at 15:12, ToddAndMargo via perl6-users wrote: Hi All, Is there one of those fancy system variables that will tell me who called/started raku? raku -e 'say $*USER' bruce Actually, I am looking for the name of the calling

Re: who call raku?

2024-02-08 Thread Bruce Gray
> On Feb 8, 2024, at 15:12, ToddAndMargo via perl6-users > wrote: > > Hi All, > > Is there one of those fancy system variables that will > tell me who called/started raku? raku -e 'say $*USER' bruce -- Hope this helps, Bruce Gray (Util of Perlmonks)

  1   2   3   4   5   6   7   8   9   10   >