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

2020-07-22 Thread Larry Wall
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 it's

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

2020-07-26 Thread Larry Wall
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 tes

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

2020-08-11 Thread Larry Wall
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 see

Re: lines :$nl-in question

2020-09-01 Thread Larry Wall
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 wo

Re: print particular lines question

2020-09-01 Thread Larry Wall
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, since

Re: lines :$nl-in question

2020-09-02 Thread Larry Wall
the attendees at : a conference 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

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

2020-10-12 Thread Larry Wall
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: *.map

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

2021-05-31 Thread Larry Wall
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: What's going on with "given (junction) {when (value)...}"

2021-05-31 Thread Larry Wall
ny(3,4)) : 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-) : >

Re: What is `Γäó`?

2022-07-01 Thread Larry Wall
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® Programm

Re: Perl 6 / Rakudo unicode code point ranges

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

Re: Gather, take, newbie questions

2013-12-11 Thread Larry Wall
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: how to set constants from command line?

2013-12-15 Thread Larry Wall
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 de

Re: (Rakudo 2014.04) 'item %h' working differently between REPL and interpreter?

2014-05-06 Thread Larry Wall
On Sun, May 04, 2014 at 10:40:16AM +0100, Philip Hazelden wrote: : Hi, : : I'm trying to create a one-element array containing a hash. I eventually : managed to do this from the REPL, but when I create a script containing the : same commands, it doesn't work. : : $ cat test.p6 : my %h = (

Re: MoarVM without executable stacks?

2015-04-13 Thread Larry Wall
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: Grammars

2015-04-20 Thread Larry Wall
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 { ~ } : token body-start { '[' } : token body-end { ']' } : token body-text { .*? } : ... : A coupl

Re: Is < > creating and Array or Parcel ?

2015-08-02 Thread Larry Wall
On Sun, Aug 02, 2015 at 03:09:07PM +0200, Moritz Lenz wrote: : If you want to extract it from the scalar, use the @ again, this : time as a prefix: : : for @$s { } # two iterations again. Note that this distinction will go away after the Great List Refactor, so Gabor gets his wish. Part of the G

Re: grep changes?

2015-10-14 Thread Larry Wall
I got tired of this FAQ, so I just made it work by using $_ as the loop variable in the implementation of grep, so that an accidentally returned regex still sees a $_ to make it happy. Running slower is already sufficient punishment. :) Larry

Re: can a method name contain a funny character?

2016-04-11 Thread Larry Wall
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 operator,

Re: can a method name contain a funny character?

2016-04-12 Thread Larry Wall
On Mon, Apr 11, 2016 at 11:32:29PM +0200, Theo van den Heuvel wrote: : Thanks Larry for the answer and the great language. : : It is quite ok for me to start alphabetically. I use the funny char : to indicate a particular aspect shared by a bunch of subs operators : and methods. : So I tried: : :

Re: testing with a "warn"

2016-04-29 Thread Larry Wall
On Fri, Apr 29, 2016 at 03:50:21PM -0400, Brandon Allbery wrote: : On Fri, Apr 29, 2016 at 3:47 PM, Brandon Allbery : wrote: : > Oh, they are resumable exceptions? Useful but rather high cost I'd think. : > (Granting that perl6 isn't one of those languages that think exceptions : > should be norma

Re: re-writing a for comments

2016-05-07 Thread Larry Wall
On Sat, May 07, 2016 at 09:54:42PM +0800, Richard Hainsworth wrote: : Hi, : In S05, I found: : "Although the default |<.ws>| subrule recognizes no comment : construct, any grammar is free to override the rule. The |<.ws>| : rule is not intended to mean the same thing everywhere." : : I was looking

Re: can a method name contain a funny character?

2016-05-21 Thread Larry Wall
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 are valid identifiers i

Re: Sorting Multidimentional Arrays

2016-10-01 Thread Larry Wall
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: log base zero ???

2016-10-20 Thread Larry Wall
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]> http://www.nntp.perl.org/group/perl.perl6.u

Re: Can I call myself

2017-02-06 Thread Larry Wall
On Sat, Feb 04, 2017 at 08:39:52PM -0800, ToddAndMargo wrote: : Are there any special rules, like in Perl 5? Do I need to : pre-declare the sub? : : sub BummerDude ($); : sub BummerDude ($) { do something; } For normal subs, you never have to predeclare, because the calling syntax can assume an u

Re: smtp question

2017-02-10 Thread Larry Wall
On Fri, Feb 10, 2017 at 06:27:07AM -0500, Brandon Allbery wrote: : If this were Haskell it'd be ByteString. But it's Perl 6 and byte arrays : are too much of a PITA at present, since you can't do string-y things with : them sensibly. The currently suggested workaround is to temporarily pretend the

Re: Modulino in Perl 6

2017-05-02 Thread Larry Wall
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 exec

Re: Need a second pair of eyes

2017-09-26 Thread Larry Wall
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 s

Re: Chained sequence operators

2018-01-26 Thread Larry Wall
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 S0

Re: odd and even

2018-05-01 Thread Larry Wall
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 everything"

Re: number of letters question

2018-05-15 Thread Larry Wall
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: Is there a backward "for @"

2018-05-15 Thread Larry Wall
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 i

Re: What is my sub?

2018-05-26 Thread Larry Wall
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 'sub

Re: How do I remove leading zeros?

2018-06-13 Thread Larry Wall
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: a `pe4rl6 -c` error to fix

2018-06-21 Thread Larry Wall
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 optimi

Re: Appropriate last words

2018-09-03 Thread Larry Wall
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 Per

Re: how do I do this index in p6?

2018-09-11 Thread Larry Wall
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" !! "Fa

Re: how do I do this index in p6?

2018-09-11 Thread Larry Wall
Oh, I guess Timo suggested .defined. I should relearn to read, now that I can see again... Larry

Re: Functions and subroutines?

2018-09-11 Thread Larry Wall
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 in

Re: Nil ?

2018-09-12 Thread Larry Wall
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 t

Re: Please explain this to me

2018-09-12 Thread Larry Wall
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 ki

Re: need p5/p6 :: help

2018-09-14 Thread Larry Wall
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 us

Re: ->

2018-09-14 Thread Larry Wall
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 th

Re: need p5/p6 :: help

2018-09-15 Thread Larry Wall
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: What is the official name of regex switches?

2018-09-15 Thread Larry Wall
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 backsla

Re: Need regex help

2018-09-15 Thread Larry Wall
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.) : : Anywa

Re: extending built-in classes

2018-09-22 Thread Larry Wall
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: words[] question

2018-09-26 Thread Larry Wall
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 group

Re: Could this be any more obscure?

2018-09-28 Thread Larry Wall
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 s

Re: join questions

2018-10-01 Thread Larry Wall
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?

2018-10-02 Thread Larry Wall
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 : >t

Re: routine declaration line question

2018-10-05 Thread Larry Wall
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 inc

Re: routine declaration line question

2018-10-05 Thread Larry Wall
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 thi

Re: routine declaration line question

2018-10-12 Thread Larry Wall
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 is

Re: Malformed UTF-8 ???

2018-10-15 Thread Larry Wall
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 $$proc.out.slur

Re: unflattering flat

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

Re: unflattering flat

2020-04-04 Thread Larry Wall
e use 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: : > : >

Re: unflattering flat

2020-04-07 Thread Larry Wall
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: %hash-with-arrays.values>>[].

Re: unflattering flat

2020-04-07 Thread Larry Wall
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: Simple Print/Say Question

2006-05-24 Thread Larry Wall
You should not need "my" on the right side of a ->. Also, you should be able to write $arg_for for constant subscripts. Larry On Tue, May 23, 2006 at 05:32:22PM -0700, Ovid wrote: : Er, and the first loop is better written as this: : : for %buckets.values -> my $arg_for { : for 0 .. $ar

Re: Simple Print/Say Question

2006-05-24 Thread Larry Wall
On Wed, May 24, 2006 at 11:43:59AM +0100, Daniel Hulme wrote: : shouldn't the >>*<< be >>* as the right-hand operand is a scalar?), then It used to be like that once upon a time, but we later changed it so infix operators are always written with "hypers" on both sides, and only the prefix and post

Re: eval

2006-05-24 Thread Larry Wall
On Wed, May 24, 2006 at 06:54:53PM +0300, Gabor Szabo wrote: : if eval "command" fails, where can I get the error message ? : : aka $@ in P5 ? All error variables have been unified into $!, so it should show up there. Larry

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

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

Re: CGI on 6

2006-05-29 Thread Larry Wall
On Mon, May 29, 2006 at 09:14:43AM +0100, Michael Mathews wrote: : On 28/05/06, Juerd <[EMAIL PROTECTED]> wrote: : >The exegeses are not updated to follow the current specifications. : >They're still useful, so they're kept around, but the syntax is out of : >date. : >Synopses are kept up to date.

Re: CGI on 6

2006-05-30 Thread Larry Wall
On Tue, May 30, 2006 at 07:56:40AM +0100, Michael Mathews wrote: : Strangely %q<$n>.push($v); doesn't : work, but %q.{$n}.push($v); does. What's the difference? The first is equivalent to %q{'$n'}.push($v). Larry

Re: Fwd: Minimum modules for Production?

2006-05-30 Thread Larry Wall
On Tue, May 30, 2006 at 02:09:19AM -0700, Darren Duncan wrote: : As I recall, it is Larry's wish that the standard distribution for : Perl 6 be quite small, so that people are encouraged to use CPAN. Hmm, but also so that people are encouraged to form various standard distributions, more along t

Re: Name of this wiki

2006-06-16 Thread Larry Wall
On Fri, Jun 16, 2006 at 11:51:09AM +0930, Tom Lanyon wrote: : On Thu, Jun 15, 2006 at 10:12:12PM -0400, Matt Todd wrote: : > I really like these. I think you're on to something. I'm definitely in : > favor of Momi Wiki, or just Momi. : : Just 'Momi' sounds good, I really like it. Hmm, 'Momi' will

Re: Conditionally included list elements

2006-06-18 Thread Larry Wall
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 C. :-) Larry

Re: Conditionally included list elements

2006-06-18 Thread Larry Wall
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 wa

Re: perl6 and a multi-interpreted-language example

2006-09-17 Thread Larry Wall
Okay, combining all these approaches minimalistically but without golfing we get something like: my @numbers = sort { rand }, constant @goal = 1..9; my $steps = 0; until @numbers ~~ @goal { say [EMAIL PROTECTED]; @numbers[ 0 ..^ prompt "Reverse how many? " ] .= reverse;

Re: Perl6 "style-guide"

2006-09-20 Thread Larry Wall
On Wed, Sep 20, 2006 at 04:16:32PM -0700, Darren Duncan wrote: : And in fact, I expect that PBP was written to be forward compatible : to Perl 6, as it could describe styles that should be natural in Perl : 6, even if less so in Perl 5. Indeed, I know for a fact that it was. (Though the treatme

Re: the CGI.pm in Perl 6

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

Re: the CGI.pm in Perl 6

2006-09-21 Thread Larry Wall
On Thu, Sep 21, 2006 at 10:10:04AM +0200, Juerd wrote: : Larry Wall skribis 2006-09-20 16:34 (-0700): : > That should work but my preference is just : > my @bar = $q.param[]; : > That is, empty .[] has the same arrayifying semantics as @. (This is : > currently b0rken in

Re: the CGI.pm in Perl 6

2006-09-21 Thread Larry Wall
On Fri, Sep 22, 2006 at 12:34:47AM +0200, Juerd wrote: : Larry Wall skribis 2006-09-21 15:24 (-0700): : > : > That is, empty .[] has the same arrayifying semantics as @. (This is : > : > currently b0rken in pugs though.) Likewise .{} is equivalen to %. : > : Nice, but what'

Re: Introspection and list question

2006-12-13 Thread Larry Wall
On Wed, Dec 13, 2006 at 10:55:28AM +0200, Gaal Yahas wrote: : L stipulates the : results of a gather are flattened to a lazy list. I'm not sure how far : that flattenning goes, but one of these should do the trick, I think It would only flatten a recursive structure with the help of something that

Re: Strange error message with anon subroutine

2006-12-13 Thread Larry Wall
On Wed, Dec 13, 2006 at 11:31:33AM -0800, Ovid wrote: : In trying to compress a list, I wrote the following code: : : my $compress = do { : my $previous; : $compress = -> $x { : if !defined $previous or $x ne $previous { : $previous = $x; : $x; :

Re: Junctions as arguments (Pugs bug)

2006-12-20 Thread Larry Wall
On Wed, Dec 20, 2006 at 10:26:41AM -0600, Jonathan Rockway wrote: : Ovid wrote: : (reversed the message a bit) : > is 'b', any('a' .. 'h'), 'junctions should work'; : : This looks like a Test "bug"; it's doing something like: : :is 'b', 'a' # not ok :is 'b', 'b' # ok :is 'b', 'c' #

Re: perl6-ish idiom for code and tests in one file

2007-01-05 Thread Larry Wall
On Fri, Jan 05, 2007 at 01:40:44PM +0200, Gaal Yahas wrote: : > I think it should be possible and nice to use a macro (possibly a : > standard subroutine, I'm not sure) like : > : > testing { : > ok foo; : > } : > : > would it make sense or I'm just crazy? : : I like the approach. I think you

Re: take()'s return value

2007-01-29 Thread Larry Wall
On Mon, Jan 29, 2007 at 01:22:49PM +0100, Carl Mäsak wrote: : gabriele (>): : >I wonder: why does take inside a gather structure returns undef? : >I think it would be nicer if it could return the taken value, so that, : >for example one can write something like: : > : > say take 2 : > : >or like:

Re: Project Idea: Perl 6 Syntax Explainer

2007-07-10 Thread Larry Wall
On Tue, Jul 10, 2007 at 04:37:13PM -0700, Dave Whipp wrote: : One approach would simply be to edit Perl-6.0.0-STD.pm and add some : markup. To pick a token at random: : : =p6explain * : An asterix in a version expression matches any version : =end : token whatever { '*' {*} } Indeed, the example

Re: pugs bugs (or features?)

2007-09-07 Thread Larry Wall
On Fri, Sep 07, 2007 at 03:00:36PM +0100, Wim Vanderbauwhede wrote: : On 07/09/2007, Chas Owens <[EMAIL PROTECTED]> wrote: : > : > On 9/7/07, Wim Vanderbauwhede <[EMAIL PROTECTED]> wrote: : > > The following program works fine in pugs r17041 (which is the rev of : > > /usr/bin/pugs on feather): : >

Re: what should be the default extension?

2008-01-05 Thread Larry Wall
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 s

Re: Perl 6 fundraising and related topics.

2008-02-21 Thread Larry Wall
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 alternative

Re: Perl 6 fundraising and related topics.

2008-02-21 Thread Larry Wall
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 marketing-wis

Re: Perl 6 fundraising and related topics.

2008-02-22 Thread Larry Wall
On Fri, Feb 22, 2008 at 11:03:03AM +0300, Richard Hainsworth wrote: > No one likes bureacracy. But I feel much happier about handing over money, > or persuading someone else to hand over money, to a group of people with > established procedures and collective responsibility, than to some > enthu

Re: Perl 6 fundraising and related topics.

2008-03-26 Thread Larry Wall
On Wed, Mar 26, 2008 at 08:26:35PM +0100, James Fuller wrote: : oh ya and the ability to mate right we can : leave the last one off ;) No we can't. That is *precisely* what this whole business of derivable grammars is about, and it came about because you couldn't mate two source filters in P

Re: qx{} or backtick?

2008-06-18 Thread Larry Wall
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 purp

Re: Stackoverflow.com Perl 6 threads of interest

2008-10-07 Thread Larry Wall
By the by, I don't know what you're using to send mail, but it's a bit difficult to extract URIs from your message when most of them are broken by autowrapping. This will be a more frequent problem as long as the average length of URIs in the world is growing, so it's probably worth dealing with.

Re: [november] Re: arrays and arrays ref question

2008-10-30 Thread Larry Wall
On Thu, Oct 30, 2008 at 12:03:55PM +0100, Carl Mäsak wrote: : Илья (>): : > I have array ref : > my $ar = [1,2,3]; : > how can I go over it? : : All I know is that `for $ar.elems { ... }` used to work for this case. : It doesn't seem to work anymore. : : Time to file a ticket, methinks. Er, .ele

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

2009-01-02 Thread Larry Wall
On Fri, Jan 02, 2009 at 06:06:31PM -0800, Geoffrey Broadwell wrote: : Meaning, the gather/take syntax doesn't make much sense, because we're : not "gathering" anything; the PID file handler has nothing to return. : We'd only be using it for the "side effect" of being able to pause the : callee's ex

Re: what is going on here?

2009-01-11 Thread Larry Wall
On Sat, Jan 10, 2009 at 11:26:50PM +0300, Richard Hainsworth wrote: > More precisely, I dont understand the meaning of the ':' after '.sort' It is turning the method call into a list operator, essentially. It's not the so-called indirect object syntax, or it would be written: my @ranking = so

Re: not wanting something

2009-01-11 Thread Larry Wall
On Tue, Jan 06, 2009 at 04:41:30PM +0300, Richard Hainsworth wrote: > Supposed I define > > regex digit { [0..9] } > > what is the negative? You need to be careful about what you mean here by "negative". If you mean "match a single character that is not in the list", then it is as Patrick said.

Re: Solution to Games #2

2009-01-11 Thread Larry Wall
On Sun, Jan 11, 2009 at 04:24:08PM +0300, Richard Hainsworth wrote: > my ($name,@list) = .split /\,/; That shouldn't parse, because .split should not be looking for an argument list. (And, in fact, STD rejects it.) You need one of: my ($name,@list) = .split: /\,/; my ($name,@list) = .

Re: getting the face value of an enum

2009-01-14 Thread Larry Wall
On Wed, Jan 14, 2009 at 02:26:23PM +0300, Richard Hainsworth wrote: > S12 defines enums and rakudo impliments them, so > perl6 > > enum wkend <>; 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

Re: Revised solution #2

2009-01-14 Thread Larry Wall
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 > percenta

Re: Operating on pairs, Was Re: Revised solution #2

2009-01-15 Thread Larry Wall
On Thu, Jan 15, 2009 at 12:46:09PM +0300, Richard Hainsworth wrote: > Larry Wall wrote: >> 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(&quo

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

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

Re: Logo considerations

2009-03-24 Thread Larry Wall
http://www.wall.org/~larry/camelia.pdf

Re: Logo considerations

2009-03-24 Thread Larry Wall
On Tue, Mar 24, 2009 at 09:49:42AM -0700, Jon Lang wrote: : 2009/3/24 Larry Wall : : > 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. Th

  1   2   >