Re: Issue #1 of the Science Perl Journal now on sale at Barnes & Noble

I apologize for spamming the p6 list - I didn't know anything about the group, it was just that it seemed like a interesting new event in the Perl world. My mistake. From: Elizabeth Mattijsen Sent: Wednesday, October 16, 2024 8:02 AM To: William Michels via perl6

Fw: Issue #1 of the Science Perl Journal now on sale at Barnes & Noble

From: Science Perl Committee [join the announcement list] After a tremendous amount of work by many individuals, I am very pleased to announce that Issue #1 of the Science Perl Journ

Re: .contains question

> I have found that when using `say` for debugging, it has been known to print > out the > previous value of a variable and not the current value. `print` does not do > this. That would certainly be a surprise to me. I'd think I was misunderstanding my program, rather than a bug in say. _

Re: A question on AND

; > there $choice_2 is only evaluated if the $answer got assigned a false > value, and then it gets evaluated in void context, discarding its value. > > Try this in Raku - what does it say? Do you still prefer "or" over "||" ? > > my $answer = 0 or 5; > >

Re: A question on AND

I always took [1] As alternatives to "&&" and "||" when used for control flow, Perl provides the "and" and "or" operators (see below). The short-circuit behavior is identical. The precedence of "and" and "or" is much lower, however, so that you can safely use them after a list operato

Re: Tip: Rakudo-2023.05.01 upgrade issue

t; > > Erasing .precomp cured the issue. The first run of > a pl6 program after that took about a minute to > compile, but after that happy camping returned. > > HTH someone else, > -T > -- Andy Bach afb...@gmail.com Not at my desk

Re: Easier way to load a buffer?

> You could think: what does "comb(2)" do? Perhaps look at the documentation? > And then maybe realize that Simon forgot that the comb(2) should be a method > on $hex? Otherwise, how would it know what to parse? Ah, I did wonder why $hex wasn't in the 2nd line in any way. > my $hex = "2A54FF5

Re: shell to raku

> raku is now my tool of choice when * manipulexity is important I had to look it up Larry Wall: Manipulexity and Whipuptitude - Fortune If you were a Unix programmer you either programmed in C or shell. And there really wasn't much in between. There were these little languages that we used on t

Re: junctions with given/when

> I'd thought that that would confirm that both elements were Int: say do given all(3,7) { when Int { "both are Int" }; default {"not similar"} }; ## not similar I get a different result $ raku -e ' say do given all(3,7) { when Int { "both are Int" }; default {"not similar"} };' both are I

Re: can u suggest a beginner book for perl6?

Check out the following GitHub repo - it has a Perl6 and a Raku section, along with pretty much every other language! https://github.com/EbookFoundation/free-programming-books/blob/master/books/free-programming-books-langs.md#perl [https://opengraph.githubassets.com/b8cc5d706ff4a4449188940b96e66b

Re: [better solution] pairs of separators from a string

I "misread" say 1, 1, * + * ...^ *>= 100; thinking "shouldn't it be '<=' as you want the total to be less than 100?" but $ raku -e 'say 1, 1, * + * ...^ *<= 100;' ===SORRY!=== Error while compiling -e Whitespace required before <= operator at -e:1 --> say 1, 1, * + * ...^ *<= 100;⏏ expecti

Re: File::Find using a junction with exclude

. Implementing the 𝐑𝐚𝐤𝐮™ programming language v6.d. Built on MoarVM version 2020.10. On Tue, May 25, 2021 at 8:38 AM Gianni Ceccarelli mailto:dak...@thenautilus.net>> wrote: On Tue, 25 May 2021 15:16:03 + Andy Bach mailto:andy_b...@wiwb.uscourts.gov>> wrote: > > How

Re: File::Find using a junction with exclude

{ ++$f }('a' | 'b,b' | 'c'); Cannot find method 'qast' on object of type NQPMu > my Int $g = 0; 0 > sub foo($) { ++$g }('a' | 'b,b' | 'c'); any(1, 2, 3) > HTH, Bill. On Mon, May 24, 2021 at 2:40 PM Andy Bach mailto:

Re: File::Find using a junction with exclude

> Cannot sent this email in 'plain text' mode as ATOM SYMBOL disappears. I was impressed I could copypasted that in the text/terminal sesion of raku's REPL and have it work. As a matter of fact: > sub foo($) { ++⚛$c }('a' | 'b,b' | 'c'); any(1, 2, 3) > say $c; 3 but, trying it without the cabbag

Re: File::Find using a junction with exclude

te. And it has great search capability: https://docs.raku.org/type/atomicint https://docs.raku.org/language/unicode_ascii#index-entry-%E2%9A%9B As to "this completely lost me": there was a mistype and "taking" shoud've been "talking". Sorry for this. "Weird/

Re: File::Find using a junction with exclude

my atomicint $c = 0; sub foo($) { ++⚛$c }('a' | 'b,b' | 'c'); say $c; I was sort of hanging on by my fingertips (this completely lost me: >Or, taking about tricks: ('a' | 'b,b' | 'c')».&(-> $ { ++⚛$c }); ) but what's that cabbage thing before $c? Oh, and WAT is" Weird/will Ass Thing"?

Re: slurpy hash signatures

Very impressive and complete explanation, thanks! > I'm inclined to view it as pretty good. I also think it might be seriously > hard to improve. As we're looking a known "trap" could this one append of those (my favorite kind) leading questions "Did you mean to pass ...?" __

Re: for and ^ question

> try out these 3 .. 7 3 ..^ 7 3 ^.. 7 3 ^..^ 7 Is the last one called the kitten or the bat operator? ;-> Happy New Year to all those for whom the year ends tonight. For the rest Happy Tomorrow! From: yary Sent: Wednesday, December 30, 2020 9:06 PM To: ToddAndM

Re: Need help understand "class"

> Would some kind soul please explain to me what is going on line by line with > the "class" statement. > cupsGetDests definition can be found at: https://www.cups.org/doc/cupspm.html The point of the class is to create a "template" in raku matching the C structure of the cups stuct. That

Re: I need to run and release a program in the background

> this command runs OUTSIDE the shell. There are no environmental variables > to be found such as $HOME Well, not exactly none, but a limited env $ raku -e 'my $pA = Proc::Async.new( "env" ); $pA.start;' TERM=xterm XDG_RUNTIME_DIR=/run/user/1000 XDG_SESSION_TYPE=tty LESSCLOSE=/usr/bin/lesspipe

Re: print particular lines question

= $alpha)++; say "d2: " ~ ++$ } }' AA d2: 1 AB d2: 2 ... By Geoffrey, I think I almost have it! Thanks! From: yary Sent: Tuesday, September 1, 2020 6:16 PM To: Andy Bach Cc: William Michels ; perl6-users Subject: Re: print particular

Re: print particular lines question

mething meaningful. in block at -e line 1 ... AA but the named doesn't raku -e 'for -> $alpha { for (1..14) { state $sv = $alpha; say $sv; $sv++; printf("d: %s\n", $sv ) } }' AA d: AB AB d: AC From: William Michels Sent: Tue

Re: print particular lines question

I'm barely hanging on with the "$" so ... so from: raku -e 'for -> $alpha { for (1..14) { print (state $ = $alpha)++ ~ " " } }' AA AB AC AD AE AF I tried an actual, er, non-anon var # raku -e 'for -> $alpha { for (1..14) { print (state $sv = $alpha)++ ~ " " } }' AA AB AC AD AE AF ... an

Re: print particular lines question

__ From: William Michels Sent: Monday, August 31, 2020 10:28 AM To: Brian Duggan Cc: Andy Bach ; perl6-users Subject: Re: print particular lines question How would P5 handle line numbers > 10 ? Not getting back line #11 with the P5 examples below: $ raku -ne '.say if

Re: print particular lines question

> raku -ne '.say if $++ == 3|2|5' Lines.txt OT, maybe, but is perl -ne 'print if $. =~ /\b[325]\b/' Lines.txt or perl -ne 'print if $c++ =~ /\b[436]\b/' Lines.txt the best you can do in P5? a Andy Bach, BS, MSCMECFA Systems Mangler Internet: andy_b..

Re: Raku User's Survey 2020 out now....

line from $*IN before your code executes. a p.s. "cryptogram", at least in my newspaper, is a quote and author's name encoded in a substitution cipher (G for A etc) to solve. Andy Bach, BS, MSCMECFA Systems Mangler Internet: andy_b...@wiwb.uscourts.gov<mailto:andy_b...@wiwb.us

Re: print particular lines question

x27; but couldn't find a $. raku-ism. https://docs.raku.org/language/variables#Special_variables Pretty cool - I didn't know about the bare "$" as a magic state var. a Andy Bach, BS, MSCMECFA Systems Mangler Internet: andy_b...@wiwb.uscourts.gov<mailto:andy_b...@wiwb.uscourt

Re: print particular lines question

7,3]; " lines.txt Though: C:\> "\Program Files (x86)\rakudo\bin\raku.exe" -ne "my @x = lines(); say @x[0,1,7,3]; " lines.txt (Line 1 Line 2 Line 8 Line 4) Cannot do 'get' on a handle in binary mode in block at -e line 1 a Andy Bach, BS, MSCMECFA Systems M

Re: print particular lines question

quot; -ne "my @x = $*IN.lines(); say @x[0,1,7,3]; " (Line 1 Line 2 Line 8 Line 4) a Andy Bach, BS, MSCMECFA Systems Mangler Internet: andy_b...@wiwb.uscourts.gov<mailto:andy_b...@wiwb.uscourts.gov> Voice: (608) 261-5738, Cell: (608) 658-1890 "The three great problems o

Re: print particular lines question

> Assigning `my @x=$_.lines` puts everything into $x[0] Trying this on windows C:\> raku.exe -e "my @x = 'lines.txt'.IO.lines; say @x[1,7,3].join(qq~\n~); " Line 1 Line 7 Line 3 or C:\> raku.exe -e " say 'lines.txt'.IO.lines[1,7,3].join(qq~\n

Re: I reproduced one of the errors!

>> Repeating any of this material won't help you. So what is a method to >> you? How do you think it might be used? > Some times methods are great for human readability. I would like to have > both in my tool chest. Not sure that's really answering the question Richard was asking. I believe he

Re: I reproduced one of the errors!

#!/usr/bin/env raku my Str $x; if $x.starts-with( "[" ) && $x.contains( "]" ) { say "Passed"; } else { say "Failed"; } K:\Windows\NtUtil>raku Contains.Test.pl6 Cannot resolve caller starts-with(Str:U: Str:D); none of these signatures match (Cool:D: Cool:D $needle, :i(:$ignorecase)!, :m(

Re: Raku -npe command line usage

>> raku -e'lines() ==> grep(/^WARN/) ==> sort() ==> join("\n") ==> say()' >> sample.log > raku -e'lines() ==> grep(/^WARN/) ==> sort() ==> reduce({$^a ~ "\n" ~ $^b}) > ==> say()' sample.log So what does reduce() do differently than join() here? I was thinking weeding out duplicates but it seems

Re: tip: Windows, Git, and those nice Linux utilities

To get access to them: --> sysdm.cpl --> Advanced (tab at the top) --> Environmental Variables (button, lower right) --> Path, Edit, add to the end ;C:\Program Files\Git\usr\bin I edited my local user path before installing: C:\Program Files (x86)\Common Files\Oracle\J

Re: stashing an array in a hash and yanking it back out

those colons are/are not doing. And we can get to those "inner" array elements via > say %stash[1] sandstone From: Vadim Belman Sent: Friday, March 13, 2020 12:50 PM To: Andy Bach Cc: William Michels via perl6-users ; Joseph Brenner ; Timo Paulssen ; yary Subject: Re: stashing

Re: stashing an array in a hash and yanking it back out

===SORRY!=== Error while compiling: Undeclared routine: morerocks used at line 1 >> say @(%stash{*}).[0].[0] morerocks => [marble sandstone granite chert pumice limestone] a ____ From: Vadim Belman Sent: Friday, March 13, 2020 12:50 PM To: Andy B

Re: stashing an array in a hash and yanking it back out

> my %stash = monsters => @monsters, rocks => @rocks {monsters => [godzilla grendel wormface blob fingfangfoom tingler], rocks => [marble sandstone granite chert pumice limestone]} > my @more_rocks = << marble sandstone granite chert pumice limestone >> [marble sandstone granite chert pumice lime

Re: qqx with quotes

rakudo 2020.01 built on moar 2020.01.1 implementing perl 6.d From: Todd Chester via perl6-users Sent: Friday, February 28, 2020 4:57 AM To: perl6-us...@perl.org Subject: Re: qqx with quotes On 2020-02-27 15:38, Andy Bach wrote: > Win10 with a new raku inst

Re: qqx with quotes

s...@perl.org Subject: Re: qqx with quotes On 2020-02-27 11:05, Andy Bach wrote: > This did work > my $file = 'hi mom' > $file ~~ s:g/\s+/*/; > my $res = qqx(dir $file); > say $res; Hi Andy, What OS did you test this on? -T

Re: qqx with quotes

This did work my $file = 'hi mom' $file ~~ s:g/\s+/*/; my $res = qqx(dir $file); say $res; ____ From: Andy Bach Sent: Wednesday, February 26, 2020 4:16 PM To: ToddAndMargo via perl6-users Subject: Re: qqx with quotes @Result = qqx { C:/Windows/System32/

Re: qqx with quotes

@Result = qqx { C:/Windows/System32/fsutil.exe usn readdata \"$FileName\" }.lines; Doesn't windows do something special for files with spaces in them? Hm, $ type "hi mom" > "test 1" $ dir test $ dir "test 1" but, you're right, I couldn't find a combination of dbl, single, q, qq, qqx, qx that'

Re: variable as subroutine?

Sent: Wednesday, February 12, 2020 1:27 PM To: Aureliano Guedes Cc: Andy Bach ; perl6-users Subject: Re: variable as subroutine? On Wed, Feb 12, 2020 at 8:12 AM Aureliano Guedes mailto:guedes.aureli...@gmail.com>> wrote: On Wed, Feb 12, 2020 at 1:09 PM Andy Bach mailto:andy_b...

Re: variable as subroutine?

____ From: Aureliano Guedes Sent: Tuesday, February 11, 2020 7:00 PM To: Andy Bach ; perl6-users Subject: Re: variable as subroutine? Sorry, I sent my answer just for you. So, the problem is you didn't call the same var you had declared. my $foo = * **2; Then you call foo(2).say

Re: variable as subroutine?

say c(4); 16 From: Simon Proctor Sent: Tuesday, February 11, 2020 9:27 AM To: Andy Bach Cc: perl6-users Subject: Re: variable as subroutine? The * * * call generates a WhateverCode block. This is expecting 2 arguments. -> $x { $x * $x } is takin

Re: variable as subroutine?

I have a few less related questions >> those are 3 ways to write the same sub: sub foo ($x) { $x * $x } my &foo = -> $x { $x * $x } my &foo = * * *; > A Note on Marc's comment: my &foo = * * * is not the same as: my &foo = -> $x { $x * $x } it is the same as: my &foo = -> $x, $y { $x

Re: Using raku/perl6 as unix "cat"....

" 'while' ...will stop when it encounters a false line--typically an empty line or '0' ". Wasn't that the point of p5's defined while ( defined(my $line = <> ) ) { or (previously lexified '$val'): print "$val\n" while defined($val = pop(@ary)); From: William Mi

Re: NativeCall bug: can't find final ')'

Just a guess, but isn't it possible that this is a quoting problem? Doing work from the Winx cmd line and trying to match up the single/double quote/multi-line mess is a way towards madness ... if you put your "-e" program in a file and run that, do you get a different error? Just my 2 cents,

Re: env?

> At the top of all my Perl 6 programs, I place > #!/usr/bin/env perl6 > > So I decided to run env by itself and see what I got: > > $ /usr/bin/env perl6 > You may want to `zef install Readline` or `zef install > Linenoise` or use rlwrap for a line editor > > To exit typ

Re: anything faster than say [+] lines?

rst one would get a warning too. $ seq 10 | perl6 -ne 'our Int $y += $_; END { say $y; }' ===SORRY!=== Error while compiling -e Cannot put a type constraint on an 'our'-scoped variable at -e:1 --> our Int $y⏏ += $_; END { say $y; } expecting any of: constraint

Re: anything faster than say [+] lines?

rickets] gets you nothing, as $y is scoped to the -n while loop ;-> From: William Michels Sent: Thursday, September 26, 2019 3:01 PM To: yary Cc: perl6 ; Andy Bach ; Joseph Brenner ; Elizabeth Mattijsen ; Marc Chantreux ; Vittore Scolari Subject: Re: anything faster than say [+] lines? Hi Yary,

Re: anything faster than say [+] lines?

> Still, it's just "works for me": seq 100 | time perl6 -ne 'my $y += $_; END { print $y; }' I think that's still the wrong one - your missing the "Int" $ seq 100 | perl6 -ne 'my Int $y += $_; END { print $y; }' 5050 though that works here, admittedly, my p6 is sort old This is

Re: core dump

On my box, man core shows how to dump core using ctrl-backslash $ perl ^\Quit (core dumped) It also gives the example of creating a pipeline for core handling (.c file text below): $ cc -o core_pattern_pipe_test core_pattern_pipe_test.c $ su Password: # ec

Re: while(<>){...} analog?

> , but I had to change .split(':') either to .split(":") or because your -e ' ' quotes are the same, so bash breaks it up into 3 chunks say .split( : )[0, 2, 1, 5].join("\t") for and perl just gets the first as the "program" From: William Michels via perl6-

Re: number of letters question

t; > >> > I want to know the number of letters A..Z (ascii 65..90), a..z >> > (ascii 97..122), >> > >> > and the numbers of numbers 0..9 (ascii 48..57) and decimal points >> > (ascii 46). >> > >> > >> > Once again, that's not so simple. You don't want other kind of numbers? >> > Would á count as one a and one '? >> > >> > >> > I won't have an weird characters in these stings, such as !@#$^&%( >> > >> > >> > Whoa, whoa, whoa, you calling á and ñ weird? >> > >> > Anyway, if that's what you want, just filter those precise graphemes >> and >> > count the number of graphemes. >> > >> > Cheers >> > >> > JJ >> >> "abcrd-12.3.4" would be five letters, six numbers, and one >> I don't care. >> > > > -- > JJ > > > -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: how do I match the next two characters?

le when matching two things >> >> $ perl6 -e 'my $x="abcsdd1efg1234xyz"; $x ~~ m/(sd..).*?(12..)/; say >> "$0, $1"' >> sdd1, 1234 >> > > The '?' is not necessary ;-) > > perl6 -e 'my $x="abcsdd1efg1234xyz"; $x ~~ m/(sd..).*(12..)/; say "$0, $1"' > sdd1, 1234 > > > Cheers! -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Self invoked anonymous functions with no outer scoped ???

the *use* keyword, followed by explicit parameters, which is followed by a block that can use those parameters and return a value. But I don't quite (er, okay, at all) understand what the point is. Just curious if P6 has anything along this sort thing. -- a Andy Bach, afb...@gmail.com 60

Re: <<>> question

, "c") > say qww{$a b c}.perl ("\$a", "b", "c") On Wed, Oct 4, 2017 at 10:22 PM, Todd Chester wrote: > On 10/04/2017 08:20 PM, Todd Chester wrote: > >> So in this context "{$x}" means insert (interpolate) a >> variable into the list? I was thinking it meant to >> insert a variable into a string. Did saying <<>> >> automatically tell Perl6 that this was a list >> and not a sting? >> > > > is ><<>> > synonymous with >qw[] > ? > -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: <<>> question

t;> >>> >>> >>> Many thanks, >>> -T >>> >>> >>> >>> Hi Guys, >>> >>> I am trying to document for myself what the difference is >>> between "" and <<>>. &g

Re: <<>> question

gt; Hi All, > > I am writing up a keeper note on <<>> and such. This example > > puzzles me. Why the space? > > It's the same as in perl5, an array interpolated in a string shows its > elements with spaces in between. Your example has an array stored in > $y. > > perl -e 'my @y=("ab",12,"xx");print "y=@x\n"' > y=ab 12 xx > > perl6 -e 'my $y=("ab",12,"xx");print "y=$x\n"' > y=ab 12 xx > > > -y > -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: Tip: hash indexing

> revoutput(%Smtp4); > > > $ HashIndexTest.pl6 > DebugTrace = 1 > smtp = smtps://smtp.zoho.com > port = 465 > username = la...@zoho.com > password = NaYukYukYuk > from = la...@zoho.com > to = cu...@zoho.com m...@zoho.com >Subject = Stooges > Text = Certainly! > FileName = > > FileName = > Text = Certainly! >Subject = Stooges > to = cu...@zoho.com m...@zoho.com > from = la...@zoho.com > password = NaYukYukYuk > username = la...@zoho.com > port = 465 > smtp = smtps://smtp.zoho.com > DebugTrace = 1 > -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: Need append help

"abc" >> abc >> > $x [R~]= "xyz" >> xyzabc >> > $x >> xyzabc >> >> > :'( > > What am I doing wrong? > > > $ perl6 -e 'my $x="abc"; $x [R~]= "yyz"; say $x;' > ===SORRY!=== Error while compiling -e > Missing required term after infix > at -e:1 > --> my $x="abc"; $x[R~⏏]= "yyz"; say $x; > expecting any of: > prefix > term > > > > -- > ~~ > Computers are like air conditioners. > They malfunction when you open windows > ~~ > -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: write bytes requires an object with REPR MVMOSHandle

iter > is a comma\n" ); } >else { $SmtpHandle.print( "$key=\n" ); } > close ( $SmtpHandle ); } > > PrintRedErr ( "$SmtpIniFileName was not found. Recreating a blank > template.\n" ); > PrintRedErr ( "Please edit this template and try again. Cowardly > existing. Bummer dude.\n\n" ); > exit 2; > } > > CreateSmtpIni(); > > > > # CheckRaid.pl6 > key = value =<> > key = value =<> > write bytes requires an object with REPR MVMOSHandle (got VMNull with REPR > Null) > in sub CreateSmtpIni at ./CheckRaid.pl6 line 52 > in sub GetSmtpIni at ./CheckRaid.pl6 line 62 > in block at ./CheckRaid.pl6 line 143 > > Line 52 is > else { $SmtpHandle.print( "$key=\n" ); } > > # cat CheckRaid.pl6.ini > # SmtpIni file for for CheckRaid.pl6 > #This file must be owned by root.root and have a permission of 400 > #Do not use a space after the = sign. > # > Subject= > -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: Any "note" without the "say"?

e 'warn("hi mom\n")' > /dev/null hi mom "note" appears to append a new line and p6 warn appears to always add the extra info. Looking at https://docs.perl6.org/routine/warn I see warn is doing even more that. Thanks. On Fri, Sep 15, 2017 at 3:58 PM, ToddAndMargo

Re: Any "note" without the "say"?

oes at one time :) It's really useful for debugging, but you > generally strip it out of production code. > > -- > brandon s allbery kf8nh sine nomine > associates > allber...@gmail.com > ballb...@sinenomine.net > unix, openafs, kerberos, infrastructure, xmonad > http://sinenomine.net > -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Floating point Num addition produces rationals?

ilt-in rationals, constructed (respectively) with the // and % operators; most other languages have them as a library, if at all, without support for literals. Is this a surprise? Is there an explanation? -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: Any text editors for programming that support the secondary selection clipboard?

ove for pasting see :help paste but vim also supports yanking into name buffers, so you can save as many as you want (well, 26?) and the put from them :help yank :help put vim does everything, you just have to find it. ;-> -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: next

/docs.perl6.org/language/5to6-nutshell.html#Flow_Control_statements my $str = ''; for 1..5 { next if $_ % 2 == 1; $str ~= $_; NEXT { $str ~= ':' } } -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: next

no "continue" blocks for loop control stmts anymore, P6? Google suggested maybe foreach loops but that was back in 2011. -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: What to do when a pattern match fails

k(more yuk)"; $y =~ m |.*\(([^)]*)\)|; # $0 has "bad stuff abc my $x="blah[good stuff 123]yuk"; # wrong brackets $x =~ m |.*\(([^)]*)\)|; # $0 still has "bad stuff abc" if ( defined $0 ) { # probably not what you wanted. -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: panda install error

put test might be ftp connection failures, though. Configuration and/or firewall problems. If the rest all passed, you might just force the install and see if it works. Net::FTP guide: http://www.perlmonks.org/?node_id=190020 -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Building Rakudo 2016-11 in bash on Win10 - worked!

2226 wallclock secs (14.34 usr 33.79 sys + 1332.52 cusr 581.81 csys = 1962.46 CPU) Result: FAIL make[1]: *** [m-spectest5] Error 1 but install worked andy@ANDY-HP:~/src/rakudo-star-2016.11$ perl6 -v This is Rakudo version 2016.11 built on MoarVM version 2016.11 implementing Perl 6.c. -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

quicksort tutorial in F# - a template?

'd ... hmm: https://en.wikipedia.org/wiki/Perl_6#Quicksort looks very much the same - and I understand that one. Maybe I could do it. -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: rakudo bug 128427 perl 5 does not build on Darwin platforms with clock_gettime

e install/bin/moar (noticing it was saying "found a install/bin/moar version xx, using that) and re-re-ran rakudobuild and that one worked. -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

Re: rakudo bug 128427 perl 5 does not build on Darwin platforms with clock_gettime

un("/usr/local/bin/perl Configure.pl --backends=moar --gen-moar -"...) called at /Users/afbach/.rakudobrew/bin/rakudobrew line 386 main::build_impl("moar", undef, "") called at /Users/afbach/.rakudobrew/bin/rakudobrew line 116 -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

rakudo bug 128427 perl 5 does not build on Darwin platforms with clock_gettime

Hi, Turns out this bug was filed for p5 (I thought I was looking at the p6 bug list) but I saw this exactly today, trying to build, via rakudobrew, on my mac book. Just checking if this is a known thing or not. -- a Andy Bach, afb...@gmail.com 608 658-1890 cell 608 261-5738 wk

[perl #125338] Installing Rakudo via rakudo-brew/panda

# New Ticket Created by "Andy Bach" # Please include the string: [perl #125338] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=125338 > Following the steps from: http://rakudo.org/how-to-get-rakudo/ All went

Re: [perl #56030] Parrot buildfest YAPC::NA::2008 x86 Leopard, build revision 28515 - Configure msg on readline test

On Wed, Jul 30, 2008 at 5:56 PM, James Keenan via RT <[EMAIL PROTECTED]> wrote: > Andy: Are you still getting the error reported in this ticket? If so, > could you paste output of Configure.pl? okay - attached - here's stderr ... Updated to revision 29896. Macintosh-3:/usr/share/cvs/afbach/parrot

Re: [perl #56304] AutoReply: smokej consumes all memory Revision: 28672 on linux

Seems to be fixed as of 29440: TEST_PROG_ARGS="-j " prove -v t/stm/runtime.t t/stm/runtime.. 1..5 ok 1 - choice (one thread) ok 2 # SKIP Intermittently failing everywhere ok 3 # SKIP Intermittently failing everywhere not ok 4 - queue adapted for the library # Failed test 'queue adapted for

[perl #56326] docs fail to build in make smoek - PERLDOC not defined in makefiles: Revision: 28692

# New Ticket Created by "Andy Bach" # Please include the string: [perl #56326] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=56326 > Seeing, on linux and x86 Darwin/leopard for make smoke: ranlib: f

Re: [perl #56304] AutoReply: smokej consumes all memory Revision: 28672 on linux

Yeah, it's runtime.t top - 11:14:36 up 1 day, 3:37, 4 users, load average: 1.11, 0.75, 0.34 Tasks: 95 total, 2 running, 93 sleeping, 0 stopped, 0 zombie Cpu(s): 14.8% us, 35.5% sy, 0.0% ni, 49.7% id, 0.0% wa, 0.0% hi, 0.0% si Mem: 2074556k total, 1251040k used, 823516k free,

[perl #56304] smokej consumes all memory Revision: 28672 on linux

# New Ticket Created by "Andy Bach" # Please include the string: [perl #56304] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=56304 > running smokej from cron, all seems to build find and smoke.html gets made/

[perl #56152] Darwin 10.5.3 x86 rel 28576 - test codingstd/perlcritic - assuming ProhibitAmbiguousNames::default_forbidden_names() in Perl::Critic 1.03

# New Ticket Created by "Andy Bach" # Please include the string: [perl #56152] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=56152 > prove -v t/codingstd/perlcritic.t t/codingstd/perlcritic..Undefined sub

Re: [perl #56118] AutoReply: --jitcapable seg fault on Darwin x86 10.5.3 on Revision: 28564

Here's a simpler bt (from integer_42.pasm) #0 0x8fe18b42 in __dyld_misaligned_stack_error () #1 0x0004 in ?? () #2 0x005cbbe0 in real_exception (interp=0x112a00, ret_addr=0x0, exitcode=28, format=0x85143b "Divide by zero") at src/exceptions.c:903 #3 0x0104cc5f in ?? () #4 0x005dec4d in ru

Re: [perl #56118] AutoReply: --jitcapable seg fault on Darwin x86 10.5.3 on Revision: 28564

After some fiddling (thanks Bruce!!!) I was able to get a core dump - here's the backtrace: #0 0x005d4405 in gc_ms_alloc_objects (interp=0x1117c0, pool=0x111b10) at src/gc/smallobject.c:399 399 pool->objects_per_alloc = (size_t)(pool->objects_per_alloc * (gdb) bt #0 0x005d4405 in gc_

[perl #56118] --jitcapable seg fault on Darwin x86 10.5.3 on Revision: 28564

# New Ticket Created by "Andy Bach" # Please include the string: [perl #56118] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=56118 > Building w/ JIT a number of the smokej tests fail: 10911 OK from 11062 tes

Re: [perl #56030] AutoReply: Parrot buildfest YAPC::NA::2008 x86 Leopard, build revision 28515 - Configure msg on readline test

Never mind - an newly added application got in the path w/ an older version of something. Original msg in Config is the only issue.

[perl #56030] Parrot buildfest YAPC::NA::2008 x86 Leopard, build revision 28515 - Configure msg on readline test

# New Ticket Created by "Andy Bach" # Please include the string: [perl #56030] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=56030 > Parrot/perl6 build fine but: Chec

Re: [perl #56030] AutoReply: Parrot buildfest YAPC::NA::2008 x86 Leopard, build revision 28515 - Configure msg on readline test

tat 65280, 0xff00) No subtests run On Wed, Jun 18, 2008 at 3:09 PM, Andy Bach <[EMAIL PROTECTED]> wrote: > Never mind - an newly added application got in the path w/ an older > version of something. Original msg in Config is the only issue. >

Re: [perl #56030] AutoReply: Parrot buildfest YAPC::NA::2008 x86 Leopard, build revision 28515 - Configure msg on readline test

svn upped to 28515 and now attempting perl6 (all tests passed all spectest_regression tests passed on 28513) and: dyld: Symbol not found: __cg_jpeg_resync_to_restart Referenced from: /System/Library/Frameworks/ApplicationServices.framework/Versions/A/Frameworks/ImageIO.framework/Versions/A/Image

Re: [perl #55196] 'print' and 'say' format a number register differently

41596 ... ./parrot ../pi.pir 3.1416 3.141596 and for $N1 = 3.1415968 3.1416 3.141597 a -- Andy Bach Systems Mangler Internet: [EMAIL PROTECTED] Voice: (608) 261-5738 Fax: 264-5932 Sent from Evolution (CentOS)!!!

Re: [perl #54734] AutoReply: make perl6 failing on Revision: 27774 (Ubuntu 8.06)

May 23 15:55 src/pmc/mutable_pmc.template Changed it in the Makefile and make perl6 succeeds. a Andy Bach Systems Mangler Internet: [EMAIL PROTECTED] Voice: (608) 261-5738 Fax: 264-5932 Sent from Evolution (CentOS)!!!

Re: [perl #50408] Test suite litters $TMPDIR

> One directory appears to contain a complete copy of MANIFEST. Other directories contain lib/Parrot/Config.pm, lib/Parrot/Revision.pm, I think those may come from the post-configure revision tests - they use File::Tmp (er, sorry, no source here) and now have a 'remove' flag set but if they

Re: [perl #50218] Uninitialized svk install hangs postconfig/03-revision.t and Parrot::Revision usage

I'm working from an svn fetched version - but the 03-revision.t goes out, makes a tmp dir, puts in a cache file .parrot_current_rev (w/ 16000 in it) file and a Makefile so the call to Parrot::Revision::current runs: sub _get_revision { my $revision; if (-f $cache and ! -f 'Makefile') {

Re: [svn:parrot] r18724 - in trunk/config: auto init/hints

Nicholas Clark wrote: Works for me! :-) A note: as possibly the stumbler-upon-this-issue; chromatic's patch made things work here, right through make smoke. Thanks. a -- Andy Bach, Sys. Mangler Internet: [EMAIL PROTECTED] VOICE: (608) 261-5738 FAX 264-5932 "Capital is only

Re: [perl #40815] Summary of 'make test' failures on Darwin

-b undle or somesuch. So, perhaps the MacOS guessing code needs to poke a tad harder at the versions of gcc/c++ its getting its hands on. a -- Andy Bach, Sys. Mangler Internet: [EMAIL PROTECTED] VOICE: (608) 261-5738 FAX 264-5932 "Capital is only the fruit of labor. Labor is th

Re: [svn:perl6-synopsis] r10215 - doc/trunk/design/syn

+=item * the C operator (less than, equal, or greater) ... The +C<< <=> >> operator's semantics are unchanged except that it returns +and Order value as described above. typo alert: "an Order value" ... right? a -- Andy Bach, Sys. Mangler Internet: [EMAIL PROTE