»ö« Welcome to Perl 6! | perl6.org/ | evalbot usage: 'perl6: say 3;' or rakudo:, niecza:, std:, or /msg p6eval perl6: ... | irclog: irc.perl6.org/ | UTF-8 is our friend! | Rakudo Star Released!
Set by diakopter on 6 September 2010.
Alias__ rakudo: all().Bool 01:02
p6eval rakudo : ( no output )
Alias__ rakudo: say all().Bool
p6eval rakudo : OUTPUT«Bool::True␤»
Alias__ rakudo: say none().Bool 01:03
p6eval rakudo : OUTPUT«Bool::True␤»
Alias__ rakudo: say notall().Bool
p6eval rakudo : OUTPUT«Could not find sub &notall␤ in main program body at line 22:/tmp/4ptmvtDjMs␤»
diakopter rakudo: say ?none 01:04
p6eval rakudo : OUTPUT«Bool::True␤»
diakopter rakudo: say ?some
p6eval rakudo : OUTPUT«Could not find sub &some␤ in main program body at line 22:/tmp/u3YbHiBgzy␤»
Alias__ rakudo: say any().Bool 01:05
p6eval rakudo : OUTPUT«Bool::False␤»
LaVolta hi #perl6...long time no see :) 02:55
sjohnson hi 02:58
dukeleto LaVolta: welcome back. 02:59
LaVolta I am excited, just find out my Perl6ish way of calculating S = a + aa + aaa + aaaa ...
dalek odel: 55673ae | diakopter++ | / (3 files):
[dotnet] implement regex subrule compilation

add a test.
LaVolta [+] (-> $n, { $n, -> $a, { $a ~ $n } ... * } )(5)[^4]
:)
sjohnson rakudo: my $s; for ^5 { $s ~= 'a' X $_ }; say $s 03:00
p6eval rakudo : OUTPUT«aaaaa␤»
sjohnson rakudo: my $s; for ^5 { $s .= 'a' X $_ }; say $s
p6eval rakudo : OUTPUT«===SORRY!===␤Quoted method name requires parenthesized arguments at line 22, near " X $_ }; s"␤» 03:01
sjohnson ahh, not good enough at perl6 yet
sjohnson sulks in the corner
LaVolta lol... 03:02
sjohnson rakudo: my $a = "mammy"; $a ~= " muffin"; say $a 03:04
p6eval rakudo : OUTPUT«mammy muffin␤»
sjohnson rakudo: for (^5) { say $_ }
p6eval rakudo : OUTPUT«0␤1␤2␤3␤4␤»
sjohnson rakudo: say 'a' X 5 03:05
p6eval rakudo : OUTPUT«a5␤»
sjohnson ahh.. there's the problem!
X operator isn't the same as in p5
LaVolta yeah...that's where the problem at...
sjohnson scratches his head 03:08
LaVolta rakudo: [+](1, * ~ 1 ... *)[^5] 03:09
p6eval rakudo : ( no output )
LaVolta rakudo: say [+](1, * ~ 1 ... *)[^5]
p6eval rakudo : OUTPUT«12345␤»
LaVolta cool
I 03:11
got a new one: [+](->$n,{$n,*~$n...*})(5)[^4]
colomon rakudo: say (1, * ~ 1 ... *)[^5].perl 03:18
p6eval rakudo : OUTPUT«(1, "11", "111", "1111", "11111")␤»
colomon ah
rakudo: say (->$n,{$n,*~$n...*})(5)[^4].perl 03:20
p6eval rakudo : OUTPUT«(5, "55", "555", "5555")␤»
colomon rakudo: say (1..5).map({ 1 x $_ }).perl 03:21
p6eval rakudo : OUTPUT«("1", "11", "111", "1111", "11111")␤»
adu rakudo: say 5 03:22
p6eval rakudo : OUTPUT«5␤»
adu YEY
LaVolta colomon: nice 'x' operator :) 03:28
mine's over-complicated when deal with string replication. 03:30
colomon Of course, if you just want to get 12345, there's always... 03:31
dalek ok: 5d76665 | hinrik++ | / (2 files):
Depend on Perl6::Doc 0.47 to avoid test failures
ok: c4ecdb9 | hinrik++ | Changes:
v0.24

   - Depend on Perl6::Doc 0.47 to avoid test failures
colomon rakudo: say +[~] 1..5
p6eval rakudo : OUTPUT«12345␤»
colomon rakudo: say +[~] 1..6
p6eval rakudo : OUTPUT«123456␤»
LaVolta thanks, colomon. 03:35
sjohnson rakudo: say "a" x 5; 03:50
p6eval rakudo : OUTPUT«aaaaa␤» 03:51
sjohnson ah, simple mistake. whoops
LaVolta :), i didn't realized what typed is cross operato... 03:54
*r
(omg, serious typos all around)
I am sorry 03:55
I was trying to figure out a general way of calc the sum of n, nn, nnn, nnnn...(repeat m times) 03:56
dukeleto LaVolta: such as 1 + 11 + 111 + ... ? 03:59
LaVolta yea, dukeleto
sjohnson heh
i dont know any tricky cool ways to do it
dukeleto rakudo: say +[+] 1,11,111 ... 11111 04:00
sjohnson rakudo: my $total; my $n = 10; $total += (1 x $_) for ^$n; say $total
p6eval rakudo : OUTPUT«Method 'count' not found for invocant of class 'Failure'␤ in <anon> at line 835:CORE.setting␤ in 'List::Bool' at line 1␤ in <anon> at line 853:CORE.setting␤ in <anon> at line 855:CORE.setting␤ in 'List::Bool' at line 1␤ in 'prefix:<?>' at line 468:CORE.setting␤ in 'reducewit…
rakudo : OUTPUT«123456789␤» 04:01
sjohnson rakudo: my $total; my $n = 10; $total += ("1" x $_) for ^$n; say $total
p6eval rakudo : OUTPUT«123456789␤»
LaVolta I still remember the day (a CS freshman), my teacher told the class to write a small C program to do it
sjohnson rakudo: my $total; my $n = 10; $total += ("1" x $_).int for ^$n; say $total
p6eval rakudo : OUTPUT«Method 'int' not found for invocant of class 'Str'␤ in <anon> at line 22:/tmp/Bc4WNbg8zY␤ in main program body at line 1␤»
sjohnson ahh, i give up
Tene rakudo: sub foo { [+] map { 1 x $_ } for 1..$^n }; say foo(5); 04:02
phenny Tene: 05 Dec 10:09Z <masak> tell Tene after I removed ihrd's Routes, I rewrote it as URI::Dispatcher. I'd be happy to hear what you think of it.
p6eval rakudo : OUTPUT«00000␤»
dukeleto rakudo: say +[+] (1, 11, 111)
p6eval rakudo : OUTPUT«123␤»
Tene rakudo: sub foo { [+] map { 1 x $_ } 1..$^n }; say foo(5);
p6eval rakudo : OUTPUT«===SORRY!===␤Unable to parse blockoid, couldn't find final '}' at line 22␤»
Tene rakudo: sub foo { [+] map { 1 x $_ }, 1..$^n }; say foo(5);
p6eval rakudo : OUTPUT«12345␤»
Tene There we go.
rakudo: sub foo { [+] map { 1 x $_ }, 1..$^n }; say foo(50);
p6eval rakudo : OUTPUT«1.23456790123457e+49␤»
dukeleto Tene: nice. 04:03
sjohnson what does the cute [+] thing do?
sjohnson just tells it to keep adding the block statement? 04:03
Tene sjohnson: [] is the reduce operator
it reduces a list with the operator inside the []s
sjohnson tents fingers.. interesting
Tene it's the same as @list.reduce(&infix:<+>); oslt 04:04
I don't remember what named forms of reduce may or may not be in Perl 6 these days.
aka foldr/foldl, but it respects the associativity of the op
LaVolta Tene: neat. 04:05
dukeleto sjohnson: [] is a meta-operator
sjohnson: you give an operator inside
sjohnson witchcraft operator!!!
dukeleto sjohnson: and it applies it to a list/array
sjohnson ill have to try it out a bit later
dukeleto rakudo: [+] 1 .. 10 04:06
p6eval rakudo : ( no output )
dukeleto rakudo: ~[+] 1 .. 10
p6eval rakudo : ( no output )
LaVolta say it :)
dukeleto rakudo: say ~[+] 1 .. 10
Tene rakudo say [+] 1..10
p6eval rakudo : OUTPUT«55␤»
dukeleto is rusty
Tene rakudo: say [+] 1..10
p6eval rakudo : OUTPUT«55␤»
dukeleto sjohnson: that is the factorial function at 10
Tene omits colon
No, factorial is [*]
colomon rakudo: sub postfix:<!>($n) { [*] 1..$n }; say 10! 04:07
p6eval rakudo : OUTPUT«3628800␤»
sjohnson rakudo: say 5!
p6eval rakudo : OUTPUT«===SORRY!===␤Confused at line 22, near "say 5!"␤»
sjohnson maybe in perl 7 :)
yeah, factorial is uses multiplication technology
Tene sjohnson: Just package up a distro with that in the setting, and you're done.
sjohnson i used to think it was addition too. is there a term for addition only?
how about use Tene; 04:08
:)
easier to remember
Tene sjohnson: I'd be glad to let you use a software version of myself to use as a Perl 6 advisor in exchange for being uploaded to make it. 04:09
sjohnson i have to figure out how to upload you first 04:10
modern technology hasn't figured out brain interfaces with computers yet
dukeleto Tene: blarg. That is sad. Of course. I did summation 04:11
dukeleto has had a long day
Tene :) 04:12
LaVolta all my tries focused on inlining the sub, using anonfunc, but ignored the truth that we all need simplification
lunch time, see you later 04:13
adu sjohnson: yes en.wikipedia.org/wiki/Arithmetic_progression 04:22
sjohnson: the additive factorial 1 + 2 + ... + n = n(n+1)/2 so it is much less interesting 04:24
moritz_ rakudo: say [+] 1..10 07:03
p6eval rakudo : OUTPUT«55␤»
moritz_ rakudo: say [+] 'foo' 07:04
p6eval rakudo : OUTPUT«0␤»
dalek : a4c325a | (Tadeusz Sośnierz)++ | misc/perl6advent-2010/schedule:
Signed in for day 8th
 07:44
moritz_ linuxfr.org/2010/12/04/27645.html # mentioned the advent calendar 09:39
developers.solidot.org/developers/1...0223.shtml Japanese (?) coverage 09:40
masak oh hai, #perl6! 11:44
moritz_ lolitsmasak! 11:45
masak: (small reminder, you're scheduled for tomorrow's advent post)
masak acknowledged. thanks.
I'm planning on writing it tonight. 11:46
mathw oh hai masak
oh hai evreewun els 11:47
Tene masak: I think you were trying to get my attention recently? 11:51
masak Tene: yes, I've made a quick Routes replacement in Web.pm -- just fishing for comments. 11:52
Tene Ah. I'll see what I can do. 11:53
masak \o/ 11:55
finanalyst hello 6-people. I havent been around for a while. What is currently being used for module loading? proto or neutro? 12:50
moritz_ use; :-) 12:53
neutro for installation
moritz_ (oh, and I implemented some simple forms of 'requuire' :-) 12:53
finanalyst moritz_: thanx. How is best to install neutro itself? 12:57
moritz_ finanalyst: dunno; are there no instructions in the README?
colomon There are instructions in the README 12:58
colomon just realized the reason his walk felt cold this morning was that it was 4F colder than any previous walk this season. 12:59
finanalyst no. i looked on github at readme, but no installation instructions, unless they are hidden somewhere. proto instructions much better
moritz_ finanalyst: sounds to me like it doesn't need installation 13:00
wait
Bootstraping:
As neutro is not dependency-free, it comes with a set of libs which
will help it install itself. To bootstrap neutro, use something like
this:
PERL6LIB=tmplib bin/neutro .
takadonet morning all
phenny takadonet: 04 Dec 15:32Z <smash> tell takadonet gil.di.uminho.pt/users/smash/rakudo-bench.html updated
takadonet !!! my first message from phenny! 13:01
masak The dark side of opern source conferences -- lwn.net/SubscriberLink/417952/bf6a55b67170ff0e/ -- might interest some people in the "how can we scale kindness" movement in here. 13:23
moritz_ (was actually posted to #parrot some days ago) 13:25
masak oh, good.
I fear I used to be a #parrot regular, but I'm not any more. :/ 13:26
nowadays I log onto #parrot by need.
moritz_ searches in the logs for the relevant discussion
irclog.perlgeek.de/parrot/2010-12-03#i_3053709 13:28
masak thanks. 13:29
moritz_ actually not too much of a discussion
masak but what there is is a good read. 13:30
"know how to be nice". I like that.
tadzik hello 13:34
masak tadzik: \o
moritz_ masak: "nice by default" would also be a good policy 13:35
masak yeah. also "assume good intentions".
I knew a girl who was a master of empathy and engaging the good side of people. don't think she was too aware of that herself. just thinking of what she'd have done in a given situation usually pulls up a few good ideas for me. :) 13:37
tadzik mathw++ # advent calendar 13:38
takadonet www.reddit.com/r/programming/commen...e_x_and_z/
masak takadonet++ 13:39
mathw Do I want to see what Reddit think of my post!
mathw upvotes most gratuitously
masak nuttin', so far :)
takadonet i just posted this 10 mins ago 13:40
Kodi So what exists for typesetting Pod at the moment? 13:46
Or rather, rendering it.
masak Kodi: search.cpan.org/~arandal/Pod-Pseudo...eudoPod.pm
that one has DocBook and HTML backends. 13:47
Kodi Excellent.
moritz_ that's p5 pseudopod
not p6 Po
d
Kodi Oops. 13:48
I kept thinking, "why no mention of Perl 6?"
masak oh, sorry. you were actually asking about Perl 6 Pod. 13:48
Kodi Right, otherwise I would have said "POD". 13:49
masak right.
guess your best shot is TheDamian's module on CPAN.
moritz_ it doesn't understand the most uptodate POD spec though
masak indeed not. 13:50
then again, nothing out there does.
Kodi: search.cpan.org/~dconway/Perl6-Perl...Perldoc.pm
masak hm, this is probably more apt: search.cpan.org/~dconway/Perl6-Perl.../Parser.pm 13:50
Kodi So how do you document your modules usually? Plain text, or use Perl 6 Pod and wait for an appropriate renderer? 13:51
flussence rakudo: say [+] (1, * ~ 1 ... *)[^10] 13:53
p6eval rakudo : OUTPUT«1234567900␤»
flussence rakudo: say [+] (1, * ~ 1 ... *)[^50] 13:54
p6eval rakudo : OUTPUT«1.23456790123457e+49␤»
moritz_ Kodi: exactly 13:54
or using p5 pod
masak or the subset of p6 pod that Rakudo supports.
which isn't much.
thundergnat good * perl6
Kodi Good DateTime.now, thundergnat. 13:55
thundergnat I was idly looking through RT and came across rt.perl.org/rt3/Public/Bug/Display.html?id=65164 and thought "That looks like LHF!" 13:56
thundergnat I wrote some infix routines that work correctly but the base ^^ operator seems to be borked. 13:57
rakudo: say 1 ^^ 1;
p6eval rakudo : OUTPUT«␤»
thundergnat should be Bool::False
rakudo: say 0 ^^ 0;
p6eval rakudo : OUTPUT«0␤»
thundergnat also should be Bool::False
moritz_ what is ^^ ? 13:58
thundergnat Where is ^^ implemented? I couldn't find it.
moritz_ erm, what's it supposed to be?
thundergnat exclusive or
moritz_ why isn't that ?^ then?
we have ~ ? and + versions of all the logic operators
^^ feels wrong 13:59
thundergnat it's in the spec
Kodi moritz_: But we say && and ||, not ?& and ?|.
thundergnat github.com/perl6/roast/blob/master/....t#L54-L68
moritz_ Kodi: && and ?& have different semantics
thundergnat Maybe the spec needs to be changed.
moritz_ ie 1 ?& 3 returns True, 1 && 3 returns 3 14:00
Kodi moritz_: ?& exists? That surprises me.
moritz_ rakudo: say 1 ?& 3
Kodi I see.
p6eval rakudo : OUTPUT«Bool::True␤»
moritz_ github.com/perl6/roast/blob/master/....t#L54-L68 14:01
argl
infix:<^^>, short-circuit exclusive-or 14:02
$a ^^ $b ^^ $c ...
Returns the true argument if there is one (and only one). Returns Bool::False if all arguments are false or if more than one argument is true.
thundergnat is ther an echo in here? :-)
moritz_ sounds like it needs to be implemented with list infix associatvity
thundergnat Right, Thats what I was doing
moritz_ thundergnat: just somebody incomepetent in the ways of mixing windows and linux copy&paste 14:03
thundergnat heh
no need to explain incompetence to me, I'm an expert in it. :-)
moritz_ src/Perl6/Grammar.pm 14:04
1886:token infix:sym<^^> { <sym> <O('%tight_or, :pasttype<xor>')> }
that's wrong
removing the :pasttype<xor> and writing your own two-arg infix:<^^> should fix it 14:05
niecza: sub infix:<ADD>($x, $y) { $x + $y }; say 3 ADD 4
p6eval niecza f30c13c: OUTPUT«7␤»
moritz_ sorear++ 14:06
thundergnat our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](0,0); 14:13
masak , belatedly, submits rakudobug
thundergnat rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](1,1);
p6eval rakudo : OUTPUT«Bool::False␤»
thundergnat rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](1,0); 14:14
p6eval rakudo : OUTPUT«1␤»
thundergnat rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](1,0,0,5);
p6eval rakudo : OUTPUT«Bool::False␤» 14:14
masak ah well, let's integrate it into #65164
thundergnat rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](0,6,0,0,0);
p6eval rakudo : OUTPUT«6␤»
thundergnat I don't see why that wouldn't work 14:15
moritz_ you'd have to align to code to make it readable :-)
thundergnat mask: That bug was way before the Bool::False Bool::True return values were implemented
moritz: yeah, this was just to get it into perl6 eval 14:16
masak moritz_: wait, two-arg op? 14:17
doesn't the infix:<^^> op have listish behaviour?
rakudo: our multi sub infix:<^^>(Mu $a, Mu $b) { $a ?? $b ?? Bool::False !! $a !! $b ?? $b !! Bool::False }; say [^^](1,2,0,3,0); 14:19
p6eval rakudo : OUTPUT«3␤»
masak that's wrong.
according to moritz_' quote above.
thundergnat masak: good point 14:20
masak infix:<^^> is *not* two-arg. that's what sets it apart from ?^
(besides the boolifying thing)
and that might be a reason it's not LHF. then again, it might still be. 14:21
thundergnat I'll have to ponder it a bit, thanks for noticing and pointing that out. 14:22
masak 1886:token infix:sym<^^> { <sym> <O('%tight_or, :pasttype<xor>')> } 14:24
actually, I don't immediately see why this would be wrong. 14:25
infix:<^^> is the high-precedence version of infix:<xor>.
moritz_ because PAST xor doesn't ever return Bool::False, for example
masak ah, it's PAST xor. 14:26
that explains it.
thundergnat rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; } say [^^](0,0,0,5); 14:45
p6eval rakudo : OUTPUT«===SORRY!===␤Confused at line 22, near "our multi "␤»
thundergnat rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; }; say [^^](0,0,0,5);
p6eval rakudo : OUTPUT«5␤»
thundergnat rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; }; say [^^](0,0,1,5);
p6eval rakudo : OUTPUT«Bool::False␤»
thundergnat rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; }; say [^^](0,0,0,0);
p6eval rakudo : OUTPUT«Bool::False␤»
thundergnat rakudo: our multi sub infix:<^^>(Mu $a, Mu *@b) { my $c ||= $a; for (@b) -> $b { return Bool::False if $c && $b; $c ||= $b; }; return $c || Bool::False; }; say [^^](1,2,0,3,0); 14:46
p6eval rakudo : OUTPUT«3␤»
thundergnat Arrgh!
moritz_ my $c ||= $a 14:47
takadonet thundergnat: working on Algorithm::Diff?
moritz_ uhm
thundergnat takodanet: not right now, pushed changes over the weekend 14:48
takadonet thundergnat++ 14:52
all tests passed on my machine
masak according to uasi, "cause understood, do not know how to fix": twitter.com/uasi/status/11799291387449344 15:14
moritz_ meta operators aren't curried yet? 15:15
masak guess not.
moritz_ rakudo: say * !== 4 15:16
p6eval rakudo : OUTPUT«Can't take numeric value for object of type Whatever␤ in 'Any::Numeric' at line 1418:CORE.setting␤ in 'infix:<==>' at line 7294:CORE.setting␤ in 'negate' at line 122:CORE.setting␤ in main program body at line 1␤»
colomon rakudo: say * R- 3 15:19
p6eval rakudo : OUTPUT«Can't take numeric value for object of type Whatever␤ in 'Any::Numeric' at line 1418:CORE.setting␤ in 'infix:<->' at line 7294:CORE.setting␤ in 'reverseargs' at line 130:CORE.setting␤ in main program body at line 1␤»
colomon rakudo: my $a = 4 R- 3; say (* R- 3).WHAT
p6eval rakudo : OUTPUT«Can't take numeric value for object of type Whatever␤ in 'Any::Numeric' at line 1418:CORE.setting␤ in 'infix:<->' at line 7294:CORE.setting␤ in 'reverseargs' at line 130:CORE.setting␤ in main program body at line 1␤»
colomon rakudo: my $a = 4 R- 3; say $a; say (* R- 3).WHAT 15:20
p6eval rakudo : OUTPUT«-1␤Can't take numeric value for object of type Whatever␤ in 'Any::Numeric' at line 1418:CORE.setting␤ in 'infix:<->' at line 7294:CORE.setting␤ in 'reverseargs' at line 130:CORE.setting␤ in main program body at line 1␤»
colomon huh. wonder where INFIX / PREFIX come from at line 2306 of Actions.pm? 15:24
That is to say, can I just say INFIX_PREFIX_META_OPERATOR there too? 15:25
colomon says JFDI and tries 15:26
thundergnat Hmmm. Ok, I'm officially confused. 15:26
thundergnat rakudo: our sub infix:<q>($a, Mu *@b) {my $c = $a; for (@b) -> $b{say "a $a, b $b, c $c";return Bool::False if $b && $a; };}; say [q](1,2,0); 15:27
p6eval rakudo : OUTPUT«a 1, b 2, c 1␤a Bool::False, b 0, c Bool::False␤␤»
thundergnat Why the heck is $a getting changed?
colomon it's not 15:28
moritz_ infix:q is called multiple times
colomon It's doing 1 q 2, then Bool::False q 0 15:29
thundergnat Ah, new $a each time.
moritz_ thundergnat: your chances are better if you define a sub prefix:<[^^]>(*@a) directly
thundergnat moritz_ yeah I'm starting to realize that. 15:30
colomon Adding INFIX_PREFIX_META_OPERATOR to line 2306 of Actions.pm does not seem to help.
where is jnthn++ when you need him?
masak at $dayjob, most likely. 15:31
thundergnat This fruit is not so LH as it looked initially, :-(
mathw my advent post is now 10 up 3 down on reddit :) 15:32
takadonet mathw: it will get more votes soon
moritz_ masak: research.swtch.com/2010/12/yacc-is-not-dead.html 15:33
masak :)
moritz_ (have only skimmed it so far)
mathw takadonet: not complaining! I was quite pleased actually 15:34
takadonet mathw: i know
ch3ck godkväll masak \o 15:35
masak moritz_: oh, it's Russ Cox, the "ur doin it wrong!" guy.
ch3ck: goder afton, min herre.
ruoso rakudo site down? 15:36
masak moritz_: seems he spends at least half of the post telling people they're doing it wrong.
ruoso: yup. downforeveryoneorjustme.com/http://rakudo.org/
everyone email alester! :)
dalek tpfwiki: (Herbert Breunung)++ | www.perlfoundation.org/perl6/index...._6_tablets 15:39
masak rakudo.org back up. alester++ 15:45
pmurias diakopter: hi 15:56
thundergnat Ok I think I've got it now gist.github.com/730480 Can anyone suggest any tests I should add that might fail? 16:05
moritz_ thundergnat: please don't use is() for comparing boolean values - it does string comparison
use ok() for things where you expect True, and nok() for tests where you expect False 16:06
thundergnat I'll do that
moritz_ and you can use Any instead of $undef
PerlJam wishes there were an Undef sometimes. 16:07
(it does read better)
masak PerlJam: I started on a yet-unreleased project lately, and I used Str for the first time in the "undefined value of type Str" sense. it felt... weird. but I don't know yet if it was because I'm unused to it, or whether it's a bad language feature. 16:17
moritz_ masak: speaking of which... how many days until your Big Announcement?
masak four.
and no, that unreleased project is not part of the Big Announcement. :) 16:18
moritz_ but it seems to leave you room for even more projects :-)
masak heh. why was I even worried that letting you all guess freely would put you on the scent? :P 16:19
ruoso trying something and failing...
paste.scsys.co.uk/58791
ruoso I only get undef as .ast 16:20
moritz_ ruoso: start with something simple and working, and gradually add more features as you go along, testing each step 16:21
masak more to the point, use TDD with grammars.
then you spot regressions when they happen.
moritz_ oh, and I'd first test if make() works from closures within regexes
masak ruoso: your script either takes a very long time here, or it's in an infinite loop of some kind. 16:22
ah, now it output 'Any()'.
moritz_ ISTR that there was a problem with them; action methods in a separate class work well though
rakudo: 'a' ~~ / a { make 42 } / and say $/.ast 16:23
p6eval rakudo : OUTPUT«Any()␤»
masak ruoso: I would recommend not using '|' at this point in Rakudo. it's not properly implemented but instead works like '||', so when Rakudo *does* get it, your code might break.
moritz_ which would explain the Any
masak moritz_++
PerlJam wonders what it would take to get rakudo to understand | properly 16:24
moritz_ PerlJam: just an LTM implementation in nqp-rx 16:25
PerlJam "just"
moritz_ right :-)
sorear built a working LTM engine; it "just" needs to be ported
which reminds me, pmichaud++ announced that he was going to be very productive in December, perl 6 wise 16:26
moritz_ hopes that's actually going to happen
masak when did he announce that?
moritz_ during a #phasers meeting
moritz_ irclog.perlgeek.de/phasers/2010-11-23#i_3024006 16:28
masak oh, that's not long ago at all. yes, I'm hpoing for that too, then. 16:30
masak don't know what I'm looking forward to more: pmichaud being very productive, or pmichaud being around more again. 16:32
takadonet moritz_: how's are page hits for the advent calendar?
masak: both
masak takadonet: have you been using junctions lately? :P
takadonet masak: ..... no 16:35
:)
masak just wondering how you could have both of two alternatives being more looked forward to. :) 16:36
takadonet heh
PerlJam masak: both are more than the unstated 3rd alternative. 16:38
moritz_ takadonet: stats are still impressive, 1.5k yesterday, 1.2k today
masak PerlJam: "being dipped in cold water, repeatedly, while forced to sing 'Happy Birthday to You'"? 16:39
in that case, yes, both.
ruoso masak: moritz_: thanks... it works now... the problem was indeed "make" in regex closures... 16:40
is that a known bug?
masak think so.
moritz_ known to me, at least :-)
masak at least I'm not at all surprised by it.
thundergnat Ok, I changed the Boolean comparison to use ok/nok, added some more tests and tidied it up a bit. Any suggestions for more tests? gist.github.com/730480 16:42
PerlJam The "long tail" for last years advent calendar posts is interesting. 16:43
or ... what happened from Apr to Jul? 16:44
masak Rakudo Star didn't get released?
PerlJam so therefore people were tweeting about the advent calendar a lot causing other people to visit it? And then when R* /was/ released, they slacked off of the advent calendar because there was something new to talk about ? 16:45
masak has no idea 16:46
PerlJam masak: look at perl6advent.wordpress.com/wp-admin/...p;post=376
moritz_ I think the advent calendar was a pretty high google hit for 'rakudo star'
and when it got released, other sites ranked higher for that query
PerlJam perhaps
masak PerlJam: that's a weird tail indeed. 16:47
PerlJam in any case ... hooray for syndication! :) 16:48
masak PerlJam: it's odd, the numbers in the table don't seem to agree with the graph. 16:49
takadonet cannot see that stats page :(
masak PerlJam: could it be a bug in the graph drawing.
takadonet: no, you have to be a calendar author.
takadonet: (hint, hint)
moritz_ takadonet: write a post for the advent calendar, then we'll make you an author :-)
takadonet masak: not a chance
masak takadonet: why not? just curious. 16:50
takadonet masak: I'm a slow writer and got way too much work right now
masak I can understand those reasons. especially the latter one.
takadonet: though it might come as a surprise that most of the active people in here don't usually complain about having too *little* to do in their non-p6 life. :) 16:51
takadonet masak: I know 16:52
takadonet mathw: we got a positive comment :) 17:05
masak "These are kick-ass." \o/ 17:07
mathw \o/ 17:08
daxim which library is the best backport to Perl5 of an foreach-interator that also gives you the index so you don't have to count manually? 17:09
masak is not aware of any 17:11
rakudo: my @a = <oh lol hai>; for @a.kv -> $index, $value { say "at index $index: $value" } 17:12
p6eval rakudo : OUTPUT«at index 0: oh␤at index 1: lol␤at index 2: hai␤»
takadonet ....
i love perl6
masak :)
takadonet no more reason for C style loops!
masak takadonet: back in 2008 or something, I proposed a special form of language construct for looping over both indices and values. I got (a variation of) the above as a reply. 17:13
plobsing while (my ($k, $v) = each @array) { say "$k -> $v" } # perl >= 5.12
masak plobsing: I thought we agreed not to use &each, ever. why dump more functionality into it? :( 17:14
plobsing I'm just saying you can do it with perl5. it's just not quite as pretty. also, I thought while-each was idiomatic. 17:15
masak certainly not an idiom that I've adopted. 17:16
I make wide circles around &each to the point that I often forget that it exists.
masak as a result, my code often works. 17:16
plobsing how do you simultaneously iterate over keys and values in perl 5 then? 17:18
daxim use Moose::Autobox; [qw(oh lol hai)]->each(sub {say "at index $_[0]: $_[1]"}); 17:20
that's the least ugly I can make it with one module
I initiated some discussion to get rid of the sub keyword in this circumstance in perl5i
masak plobsing: in hashes? I iterate over the keys, and then pull out the value inside the loop. 17:21
daxim could tie in with named parameters so our underscore friends can go away, too
masak daxim: I haven't looked much into perl5i, and I know that it's not the goal to turn it into Perl 6, but so far it seems to me to mostly be corroborating the "you can't get there from here" theory about Perl 5 and Perl 6. :) 17:23
i.e. if you start with Perl 5 and then tweak it, you're not going to get Perl 6, just more (and quite possibly uglier) Perl 5.
daxim I challenge that theory 17:24
I retract that statement
masak :)
daxim: actually, the original quote is from TimToady: "reimplementing insanity is insane" (talking about Perl 5) 17:25
justatheory challenges daxim right back 17:27
masak swimming & 17:33
sorear good * #perl6 19:56
takadonet sorear: yo
colomon \o 19:59
lichtkind hai 20:00
what is ment by quote protection? 20:01
moritz_ context?
lichtkind << >>
is declared as qw with qiote protection 20:02
quote
moritz_ ah
<<a "b c" d>> returns three items 20:03
whereaas <a "b c" d> is 4 items
PerlJam seems like something the specs could use a little more verbiage on. 20:04
lichtkind moritz_: thank you 20:05
jnthn evening, #perl6 20:11
masak jnthn! \o/
jnthn masak! \o/ 20:12
colomon jnthn: \o/ 20:13
dalek tpfwiki: (Herbert Breunung)++ | www.perlfoundation.org/perl6/index...._io_tablet
tpfwiki: (Herbert Breunung)++ | www.perlfoundation.org/perl6/index....ics_tablet
masak just saw this: twitter.com/muralichari/status/11852945066827777 20:22
couldn't keep myself from replying this: twitter.com/carlmasak/status/11878067303620608
:)
moritz_ :-) 20:23
masak wonder what an outisder'll make of Yapsi. 20:24
moritz_ :-) 20:25
[Coke] wonders if he counts as an outsider. 21:46
sorear [Coke]: depends. What do you think of yapsi? 21:52
[Coke] not much. *rim shot* 21:53
I read the announcements when they come out. they seem to be more humorous than anything else.
PerlJam Hmm. More humorous than informative? Perhaps masak should dial the humor down a bit then. 21:55
moritz_ enjoys the humor 21:56
sjohnson seemed fine to me 21:57
jnthn Yapsi is a project to produce a funny email one a month, no? ;) 21:59
PerlJam "Those Perl 6 guys sure are a funny bunch!"
[Coke] jnthn: exactly my thoughts. ;) 22:04
diakopter was there #phasers ? 22:27
colomon isn't #phasers tomorrow? 22:41
jnthn aye 22:42
masak ahoy! 22:50
jnthn ohay 22:51
masak I've written an advent post for tomorrow. 22:57
jnthn masak++
masak with a bit of luck, I'll even be able to put it up as a draft on wordpress.
but I... have... a bit of a lag right... now...
jnthn oh....i.......c. 22:58
sjohnson heh 22:59
masak whoa! uasi++ seems to have fixed RT #80256: twitter.com/uasi/status/11907116134563840
anyone want to spectest that patch? 23:00
(I could do it later, but if someone can do it now, even better)
also, does it look like a good solution? it looks OK to me, but I'm not too familiar with Actions.pm 23:01
jnthn masak: I fear it may end up auto-currying &infix:<+>(*, 42) 23:04
masak jnthn: hm. shouldn't it?
jnthn I think it'd be a change from current behavior. 23:05
sorear hello masak! 23:08
masak hi sorear! 23:09
sorear wonders what an outsider will think of Niecza.
masak ok, draft is up. please have a look and see what you think. :) 23:18
masak moritz_++ did the first post that got >1k visitors on a given day. mathw++'s post overtook it, though. 23:22
masak [Coke]: your view on Yapsi worries me a bit. you know there's actual running code in the Yapsi project, right? 23:24
sorear masak: so I hear you has a Perl 6 job. 23:25
masak sorear: no, I didn't say that. 23:28
sorear: I said Perl 6 got me a job.
jnthn Word order is so overrated.
masak sorear: come January, I'll be working for the same employer as jnthn. 23:29
sorear: ...and because I've only been doing Perl 6 in the presence of jnthn, that must be what got me hired. :) srsly. 23:32
jnthn would have known about masak++ if it wasn't for Perl 6. :) 23:33
masak missing "n't"? 23:34
jnthn er, yes :)
.oO( Actually, I stalk everyone... )
masak the original reading was interesting too, mind :)
colomon Apparently my post is the one nobody wants to read. 23:38
masak just to be clear: for those who want to read the "Day 7" draft, it's up on perl6advent.wordpress.com/wp-admin/edit.php
(perl6advent.wordpress account required)

Powered by Cro and the Raku® Programming Language.

Please report any issues / comments / feature requests as an issue on App::Raku::Log.

Thank you!