Re: What is `Γäó`?

Technically speaking, it's mojibake. Larry On Fri, Jul 1, 2022 at 7:34 PM ToddAndMargo via perl6-users < perl6-users@perl.org> wrote: > Hi All, > > Windows 10 Pro - 21H2 > RakudoMoar-2022.06.01-win-x86_64-msvc.msi > > > raku -v > Welcome to Rakudo™ v2022.06. > Implementing the Raku®

Re: What's going on with "given (junction) {when (value)...}"

any(True, False) : : > ? (3.ACCEPTS(any(3,4))) : True : : -y : : : On Mon, May 31, 2021 at 6:38 PM Larry Wall wrote: : : > On Sun, May 30, 2021 at 10:18:13PM -0400, yary wrote: : > : This came up in today's Raku study group (my own golfing-) : > : : > : &g

Re: What's going on with "given (junction) {when (value)...}"

On Sun, May 30, 2021 at 10:18:13PM -0400, yary wrote: : This came up in today's Raku study group (my own golfing-) : : > ? (any(4,3) ~~ 3) : True : > ? (3 ~~ any(4,3)) : True : > given any(4,3) { when 3 {say '3'}; say 'nope'} : nope : > given 3 { when any(4,3) {say '3'}; say 'nope'} : 3 : > given

Re: Language Design: 'special casing' of split()? (i.e. .split performs concomitant .join? )

On Mon, Oct 12, 2020 at 01:14:09PM -0300, Aureliano Guedes wrote: : > This seems pretty convenient and intuitive. At least, it is possible : > to mimic that behavior in Raku: : > : > List.^find_method('split').wrap: { $^a.map: *.split($^b) } : > List.^find_method('sin').wrap:

Re: lines :$nl-in question

ference are the people on stage, being attended-to by the : attendants sitting down below them. : : : : On 9/1/20, Larry Wall wrote: : > On Sun, Aug 30, 2020 at 03:12:26PM -0700, yary wrote: : > : I have a quibble there. 1st & 2nd sentences disagree slightly by going : >

Re: print particular lines question

On Mon, Aug 31, 2020 at 05:05:53PM -0700, yary wrote: : I like this better for alpha counter : : raku -e "for (1..4) { say (BEGIN $ = 'AAA')++ }" : : with BEGIN, the assignment of AAA happens once. With the earlier ||= it : checks each time through the loop. : -y Careful with that, though,

Re: lines :$nl-in question

On Sun, Aug 30, 2020 at 03:12:26PM -0700, yary wrote: : I have a quibble there. 1st & 2nd sentences disagree slightly by going from : active to passive voice. "Caller, the one who calls" vs "object on which : that method is being called" : : Suggestion for 2nd sentence "The invocant of a method

Re: Combining multiple "is..." traits into one?

On Wed, Aug 12, 2020 at 12:12:34AM +0200, Tobias Boege wrote: : I have no idea if this attribute or the format : for the 'prec' key in particular are standardized. The whole point of providing equiv/tighter/looser was to avoid standardizing absolute precedence levels. That being said, I don't

Re: Learning the "ff" (flipflop) infix operator? (was Re: Raku version of "The top 10 tricks... .")

On Sat, Jul 25, 2020 at 04:32:02PM -0500, Brad Gilbert wrote: : In the above two cases ff and fff would behave identically. : : The difference shines when the beginning marker can look like the end : marker. The way I think of it is this: You come to the end of "ff" sooner, so you do the end

Re: Raku version of "The top 10 tricks of Perl one-liners" ?!?

On Sun, Jul 19, 2020 at 09:38:31PM -0700, William Michels via perl6-users wrote: : Hello, : : I ran across this 2010 Perl(5) article on the Oracle Linux Blog: : : "The top 10 tricks of Perl one-liners" : https://blogs.oracle.com/linux/the-top-10-tricks-of-perl-one-liners-v2 : : Q1. Now that

Re: unflattering flat

On Tue, Apr 07, 2020 at 09:15:06AM -0700, Larry Wall wrote: : Maybe if I actually put a Chinese character in like 楽 it will leave it in UTF-8? Oops, actually, now that I think about it, 楽 (raku) is a Japanese-only character. The Chinese equivalents are traditional 樂 and simplified 乐. I really

Re: unflattering flat

On Mon, Apr 06, 2020 at 08:04:45PM -0400, yary wrote: : Larry's answer came through my browser with munged Unicode, it looks like : this : : [image: image.png] : - with the Chinese character for "garlic" after the word "values" I wrote the Unicode equivalent of:

Re: unflattering flat

this as a hack that works to 10 : levels deep: : : my %hash-with-arrays = a => [1,2], b => [3,4]; : sub postfix:<[**]> ($arg) { $arg[*;*;*;*;*;*;*;*;*;*]} : say %hash-with-arrays.values[**].flat # (1 2 3 4) : : On Sat, Apr 4, 2020 at 7:46 PM Larry Wall wrote: : > : > You c

Re: unflattering flat

You can also do a hyper descalarize if you're into that sort of thing: %hash-with-arrays.values»[].flat Larry

Re: Malformed UTF-8 ???

On Sun, Oct 14, 2018 at 02:03:23AM -0700, ToddAndMargo via perl6-users wrote: : On 10/13/18 3:02 AM, ToddAndMargo via perl6-users wrote: : >Hi All, : > : > if  $StdOut  { $ReturnStr = $$proc.out.slurp-rest; } : > : >gives me : > : > Malformed UTF-8 : > : >How do I clean up

Re: routine declaration line question

On Fri, Oct 12, 2018 at 06:47:40AM -0400, Curt Tilmes wrote: : Adding it gives more information to the consumers of that routine, : the people reading it, the compiler optimizing use of the routine, : and the runtime execution which will validate the return and throw an : exception for you if it

Re: routine declaration line question

On Thu, Oct 04, 2018 at 09:35:08PM +0200, JJ Merelo wrote: : El jue., 4 oct. 2018 21:21, Brandon Allbery escribió: : : > I don't think we've reached the point of such conventions yet. And there's : > some history here, in --> not having done anything in the early days except : > possibly slow

Re: routine declaration line question

On Thu, Oct 04, 2018 at 03:13:15PM -0400, Trey Harris wrote: : Right; that's what I meant by "stylistically" — a `--> Mu` can highlight : that something is being returned (and that side-effects are not the primary : purpose), while nothing indicates that the return value, though it exists, : is

Re: Could this be any more obscure?

On Tue, Oct 02, 2018 at 05:28:01PM -0700, ToddAndMargo wrote: : On 10/2/18 11:23 AM, Ralph Mellor wrote: : >So, to recap: a postfix `[]` acts on whatever is on its left, : >pulling out elements from the thing on its left, treated as : >a list like thing, with the elements selected according to :

Re: join questions

On Sun, Sep 30, 2018 at 04:02:15AM -0700, ToddAndMargo wrote: : Hi All, : : https://docs.perl6.org/routine/join#(List)_routine_join : : method join(List:D: $separator --> Str:D) : : $ p6 'say (1, ).join("|");' : 1|a b c : : : It states in the manual that this will happen. : : Questions: : :

Re: Could this be any more obscure?

On Fri, Sep 28, 2018 at 03:50:31PM -0700, ToddAndMargo wrote: : On 9/27/18 12:40 AM, Laurent Rosenfeld via perl6-users wrote: : > > I am NOT asking it to limit my request to Infinity. : > : >Yes you are, implicitly. If you don't pass any parameter for : >$limit, $limit will take the default value

Re: words[] question

On Wed, Sep 26, 2018 at 01:16:26PM -0400, Parrot Raiser wrote: : Would it be correct to say: : [ ] aka square brackets, always surround the subscript of an array or : list, i.e. here "n: is an integer, [n] always means the nth item, : while : ( ), round brackets or parentheses, separate and

Re: extending built-in classes

On Sat, Sep 22, 2018 at 11:40:13AM -0700, Joseph Brenner wrote: : Sounds good, thanks. Well, yes, *sounds* good. :-) Monkey patching is allowed but discouraged in Perl 6, because Ruby. Larry

Re: Need regex help

On Sat, Sep 15, 2018 at 06:45:33PM -0700, ToddAndMargo wrote: : Hi All, : : I have been doing a bunch with regex's lately. : I just throw them out based on prior experience : and they most all work now. I only sometimes have to : ask for help. (The look forward () feature : is sweet.) : :

Re: What is the official name of regex switches?

On Sat, Sep 15, 2018 at 06:37:34PM -0700, ToddAndMargo wrote: : Hi All, : : \L : \N I don't really know what you mean by those. Regex switches are things like :i for case insensitivity. They're also called regex modifiers or regex options. They always start with colon. Something with a

Re: need p5/p6 :: help

On Fri, Sep 14, 2018 at 06:12:15PM -0400, Vadim Belman wrote: : Though technically this aspect was clear to me, but to settle things down in my mind completely: for now ordinary (not 'our') sub belongs not to the package object but to the block which belongs to that package. Is it correct way to

Re: ->

On Fri, Sep 14, 2018 at 09:30:51PM +0200, Elizabeth Mattijsen wrote: : The combination of “->” and “{ }” is sometimes referred to as a “pointy block”, or even maybe just a “pointy”. Note that "pointy" is specifically referring to the syntax here, not the semantics. People use other terms when

Re: need p5/p6 :: help

On Fri, Sep 14, 2018 at 04:15:02AM -0700, Todd Chester wrote: : Also, did you answer my question about "::" and did it : just go over my head? The implication was that "::" didn't change, but the default package scoping of p5 that you're relying on is no longer the default in p6. : The p5 guys

Re: Please explain this to me

On Tue, Sep 11, 2018 at 10:28:27PM -0700, ToddAndMargo wrote: : Okay, foul! :Str:D: Cool:D $needle : why is there not a comma between "Str:D:" and "Cool:D"? : And what is with the extra ":". By chance is the extra ":" : a confusing way of using a comma for a separator? Well, "confusing" is

Re: Nil ?

Basically, ignore any advice to treat Nil as a normal value, because it really is intended to represent the *absence* of a value as much as possible. It's a bit like the way solid-state electronics treats "holes" as if they were real particles, and gets away with it much of the time. But not all

Re: Functions and subroutines?

On Tue, Sep 11, 2018 at 03:47:46AM -0700, ToddAndMargo wrote: : In Perl, what is the proper terminology? We're not picky, since Perl has never made a hard and fast distinction between routines that return values and routines that don't. You can call them all functions or routines or procedures

Re: how do I do this index in p6?

Oh, I guess Timo suggested .defined. I should relearn to read, now that I can see again... Larry

Re: how do I do this index in p6?

On Tue, Sep 11, 2018 at 02:42:20AM -0700, ToddAndMargo wrote: : How do I clean this up for use with Perl 6? : : $ perl -E 'say index("abc", "z") == -1 ? "False" : "True"' : False I'm a little bit surprised nobody suggested the most basic method: say index("abc", "z").defined ?? "True" !!

Re: Appropriate last words

On Mon, Sep 03, 2018 at 11:45:58AM -0500, Stephen Wilcoxon wrote: : Why the change in die handling between Perl 5 and 6? Suppressing line : numbers with newline was very handy. Alternatively, adding some sort of : directive would be more straight-forward (at least for Perl 5 users moving : to

Re: a `pe4rl6 -c` error to fix

On Wed, Jun 20, 2018 at 10:58:01PM -0700, Brent Laabs wrote: : -c does compile time warnings, not runtime warnings. You can't make : runtime warnings appear at compile time without using a BEGIN block. That's perhaps a bit oversimplified, since in this case the warning is coming out of the

Re: How do I remove leading zeros?

I'd probably just write something like: s:g { « <( 0+ )> \d+ » } = ''; The first <( and the last » are not strictly necessary, but add clarity, or at least balance. But in golf mode you could get away with something like: sg/«0+)>\d//; Larry

Re: What is my sub?

On Fri, May 25, 2018 at 07:23:45PM -0700, ToddAndMargo wrote: : Follow up: based on Yary's wonderful advice, this is my keeper : on the subject: : : : : perl6: what is the name of the subroutine you are currently in: : : It is: : &?ROUTINE.name : callframe(0).code.name : : $ p6

Re: Is there a backward "for @"

On Tue, May 15, 2018 at 03:31:07PM -0700, ToddAndMargo wrote: : Hi All, : : This seems like a trivial question, but I really adore : the "for" loops. Is there a way to do the backwards? : In other words, start at the end of the array and loop : to the beginning? Does the "next" and "last" work

Re: number of letters question

On Tue, May 15, 2018 at 12:44:12AM -0700, ToddAndMargo wrote: : "abcrd-12.3.4" would be five letters, six numbers, and one : I don't care. Here's another approach: $ p6 '"abcrd-12.3.4".comb.classify(*.uniprop).say' {Ll => [a b c r d], Nd => [1 2 3 4], Pd => [-], Po => [. .]} $ p6

Re: odd and even

On Tue, May 01, 2018 at 01:43:44AM -0700, ToddAndMargo wrote: : The worst thing I had problems with in Perl was folks telling it : was "Lexiconical". What? I wish they would have also said "which : means Perl figures out your variables type on the fly, so you don't : have to type cast

Re: Chained sequence operators

The most detailed description of ... is still to be found starting down a few paragraphs in the https://design.perl6.org/S03.html#List_infix_precedence section. In general the operators have not suffered as much "spec rot" as some other parts of the "speculations" known as Synopses, so most of

Re: Need a second pair of eyes

On Mon, Sep 25, 2017 at 10:25:42AM -0400, Brandon Allbery wrote: : So as to make this not entirely content-free: I would suggest that the : string language note the line on which it sees a bare newline, and if it : subsequently hits a syntax error while still parsing that string it could : output

Re: Modulino in Perl 6

On Tue, May 02, 2017 at 05:02:40PM +0200, Gabor Szabo wrote: : Using the caller() in Perl 5 one can figure out if the file was loaded : as a module or executed as a script. : : In Python one could check if __name__ is equal to "__main__". : : Is there some way in Perl 6 to tell if a file was

Re: log base zero ???

06:31 < [Coke]> iBakeCake: latest message on perl6-users about log(23,0) seems to be something in your current wheelhouse 06:32 < iBakeCake> [Coke]: what is it? 06:32 < iBakeCake> Isn't log base 0 undefined 06:32 < moritz> log to base 0? 06:32 < [Coke]>

Re: Sorting Multidimentional Arrays

On Sat, Oct 01, 2016 at 07:57:34PM +0200, mimosinnet wrote: : @opposite = @opposite.sort({@$^a[3]}); I'd probably write that as: @opposite .= sort: { $^a[3] } or maybe just @opposite .= sort( *[3] ); Larry

Re: can a method name contain a funny character?

On Fri, May 20, 2016 at 09:39:30AM -0400, yary wrote: : On Tue, Apr 12, 2016 at 6:12 PM, Brandon Allbery : wrote: : > I was explaining why some "symbols" are acceptable to the parser. Which : one : > is more appropriate is not my call, : : I was thinking about what exactly

Re: can a method name contain a funny character?

You have to write it like this: class Foo { method ::('❤') { "mem heart".say } } my Foo $foo .= new; $foo.'❤'(); Other than that, only names beginning alphabetically are allowed. You could work around this on the caller end with a postfix:<❤>, but that would be an

Re: Grammars

On Sun, Apr 19, 2015 at 06:31:30PM +0200, mt1957 wrote: : L.s., : : I found a small problem when writing a piece of grammar. A : simplified part of it is shown here; : ... : token tag-body { body-start ~ body-end body-text } : token body-start { '[' } : token body-end { ']' } : token body-text

Re: MoarVM without executable stacks?

On Mon, Apr 13, 2015 at 12:25:25AM -0400, Mark Montague wrote: : Sorry for the noise. No need to apologize--I thought it was interesting. Larry

Re: how to set constants from command line?

On Sun, Dec 15, 2013 at 11:28:02AM -0500, Parrot Raiser wrote: : It's not really a constant he wants, but a value that's read-only to : everything but the setting routine. Some sort of object, perhaps? Any parameter to sub MAIN is readonly by default, since parameters in general are readonly by

Re: Gather, take, newbie questions

On Thu, Dec 12, 2013 at 02:05:35PM +1100, Jacinta Richardson wrote: :sub MAIN($terms = 35, $maximum = 4_000_000) { : my @sequence = gather for fibonacci($maximum) - $number { : state $count = 0; : take $number if $number $maximum $count++ $terms; : };

Re: Perl 6 / Rakudo unicode code point ranges

In addition what Will said, you don't have to write \c[0xFFFD], since \xFFFD should do the same. Larry

Re: Something wrong with str.reverse

On Fri, Jun 18, 2010 at 11:21:52AM +0200, Jan Ingvoldstad wrote: : On Fri, Jun 18, 2010 at 11:15, Smylers smyl...@stripey.com wrote: : : : For the benefit of Perl 5 programmers used to string reverse it would be : nice to have a warning if reverse is invoked with exactly one string : argument

Re: Duration of a flip-flop's flippy thing

On Wed, Sep 16, 2009 at 03:28:47PM -0400, Minimiscience wrote: I have a Perl 6 function currently written in the form: sub func($x) { for @data - $datum { if condition($datum, $x) ff * { # Do various things } } # Do various other things } I

Re: Logo considerations - 3 logos needed

On Wed, Mar 25, 2009 at 08:54:34AM -0400, Guy Hulbert wrote: : On Wed, 2009-25-03 at 22:45 +1100, Timothy S. Nelson wrote: : Additionally, while you recommended Camelia for Rakudo, my : understanding was that Larry was recommending it for Perl 6 rather than : Rakudo. This is correct.

Re: Logo considerations - 3 logos needed

On Wed, Mar 25, 2009 at 03:43:47PM -0400, Guy Hulbert wrote: : On Wed, 2009-25-03 at 09:39 -0700, Larry Wall wrote: : On Wed, Mar 25, 2009 at 08:54:34AM -0400, Guy Hulbert wrote: : : On Wed, 2009-25-03 at 22:45 +1100, Timothy S. Nelson wrote: : : Additionally, while you recommended

Re: Logo considerations

http://www.wall.org/~larry/camelia.pdf

Re: Logo considerations

On Tue, Mar 24, 2009 at 09:49:42AM -0700, Jon Lang wrote: : 2009/3/24 Larry Wall la...@wall.org: : http://www.wall.org/~larry/camelia.pdf : : Cute. I do like the hyper-operated smiley-face. : : What I'd really like to see, though, is a logo that speaks to Perl's : linguistic roots. That, more

Re: Logo considerations

Oh, I forgot to mention that Camelia's larval form was a dromedary, and she's actually got a wingspan of about 3 meters. You really don't want to get her mad. (It is rumored that she has a very small hump, but if so, she shows it only to her close friends.) She was genetically engineered while

Re: Logo considerations

On Tue, Mar 24, 2009 at 01:33:41PM -0400, Guy Hulbert wrote: : I was unaware of mysogyny in the perl community. I'm sorry to hear : about it. In general it's not overt as it is in other communities, or even intended--I think we do pretty well, in fact--but it's easy to discourage people

Re: Converting a Perl 5 pseudo-continuation to Perl 6

On Tue, Jan 27, 2009 at 12:27:56AM +0100, Aristotle Pagaltzis wrote: : * Aristotle Pagaltzis pagalt...@gmx.de [2009-01-02 23:00]: : That way, you get this combination: : : sub pid_file_handler ( $filename ) { : # ... top half ... : yield; : # ... bottom half ... :

Re: getting the face value of an enum

On Wed, Jan 14, 2009 at 02:26:23PM +0300, Richard Hainsworth wrote: S12 defines enums and rakudo impliments them, so perl6 enum wkend Sat Sun; my $x = Sun; say $x 1 But suppose I want to get the face value of $x, viz., 'Sun'? How do I get it? say $x.key doesnt work. Why not just .perl?

Re: Revised solution #2

On Wed, Jan 14, 2009 at 09:55:38AM +0300, Richard Hainsworth wrote: However, I came across one thing in solution #3 that I posted yesterday. $pair.fmt(%s %s) is nice, but it doesnt allow for any action on either value or key before printing (I wanted to print the value as a percentage),

Re: qx{} or backtick?

On Thu, Jun 19, 2008 at 07:45:24AM +0300, Gabor Szabo wrote: : Hi, : : If system() is now called run() : : What replaces backtick or qx{} ? qqx[] or qq:x[] would be the exact equivalent. qx[] or q:x[] would be the same with single-quote semantics. (There are probably no backticks for that

Re: Perl 6 fundraising and related topics.

On Thu, Feb 21, 2008 at 01:29:05PM +0100, Juerd Waalboer wrote: : Then backtracking would happen, or more likely: Perl 6 would die. If : this community cannot come up with a virtual machine that can handle : Perl 6, then many people will lose all hope. Except that the people working on

Re: Perl 6 fundraising and related topics.

On Thu, Feb 21, 2008 at 01:07:14PM +0100, Juerd Waalboer wrote: : I would very strongly prefer to see a focussed effort towards a single : full implementation. : : There are many important benefits to having several implementations, : including fun and education. But commercially and

Re: what should be the default extension?

On Sun, Jan 06, 2008 at 12:55:28AM +0100, Juerd Waalboer wrote: : Personally I'm hoping for some extra abstraction in module filenames, to : allow UTF-8 module names with ASCII filenames. Already specced. From S02: In the abstract, Perl is written in Unicode, and has consistent Unicode

Re: the CGI.pm in Perl 6

On Thu, Sep 21, 2006 at 12:43:41AM +0200, Juerd wrote: : my @bar = @{ $q-param-{ 'bar' } }; : : my @bar = $q.parambar.'@'; : my @bar = @ $q.parambar; That should work but my preference is just my @bar = $q.parambar[]; That is, empty .[] has the same arrayifying semantics as @. (This

Re: Conditionally included list elements

On Sun, Jun 18, 2006 at 05:18:52PM +0200, A. Pagaltzis wrote: : Maybe TheLarry can enlighten us… :-) We already have the operator you want. It's spelled Cxx?. :-) Larry

Re: Conditionally included list elements

On Sun, Jun 18, 2006 at 07:27:57PM +0200, A. Pagaltzis wrote: : * Larry Wall [EMAIL PROTECTED] [2006-06-18 19:05]: : On Sun, Jun 18, 2006 at 05:18:52PM +0200, A. Pagaltzis wrote: : : Maybe TheLarry can enlighten us… :-) : : We already have the operator you want. It's spelled Cxx

Re: Logic Programming for Perl6 (Was Re: 3 Good Reasons... (typo alert!))

This topic may be better suited to perl6-language, unless you consider its denizens to already be self-selected against logic programming. :) Larry