Perl 6 - the future is here, just unevenly distributed

IRC log for #perl6, 2009-03-28

Perl 6 | Reference Documentation | Rakudo

| Channels | #perl6 index | Today | | Search | Google Search | Plain-Text | summary

All times shown according to UTC.

Time Nick Message
00:09 PerlPilot joined #perl6
00:19 bacek_ joined #perl6
00:20 mikehh joined #perl6
00:20 PerlPilo1 joined #perl6
00:22 rob joined #perl6
00:22 dduncan joined #perl6
00:33 justatheory joined #perl6
00:33 bacek_ hi again
00:37 bacek_ mberends: http://gist.github.com/86988 "pure" perl6 example of http client. Requires latest parrot :)
00:53 cspencer joined #perl6
00:58 pmichaud bacek++   # niiiice http client
00:58 mberends joined #perl6
01:03 mberends bacek: good $your_time, getting latest parrot :)
01:06 mberends bacek++: v.nice client indeed :)
01:07 skids rakudo: my @b;  @b[1] = 0; @b.say
01:07 p6eval rakudo 9fa0fc: OUTPUT«Use of uninitialized value␤0␤»
01:07 skids rakudo: my @b;  @b[1] = 0; @b.perl.say
01:07 p6eval rakudo 9fa0fc: OUTPUT«Null PMC access in isa()␤current instr.: 'parrot;List;!flatten' pc 5960 (src/classes/List.pir:227)␤»
01:09 pmichaud skids:  yes, there's a bug there (already reported in RT)
01:09 skids thanks.
01:11 mberends yes! Rakudo on Parrot r37783 sends/receives on TCP sockets! # bacek++
01:12 skids let the nefariousness commence!  :-)  bacek++
01:13 mberends Internet beware - Perl 6 is online!
01:25 hercynium joined #perl6
01:29 eternaleye joined #perl6
01:30 dduncan something I'm wondering in general, has Rakudo caught up to Pugs in functionality and if not then what are the major differences ... or is this written somewhere ... maybe comparative smokes?
01:30 dduncan or is it ahead in places?
01:31 dduncan I'm guessing big number support is one difference based on GSOC entries
01:32 mberends dduncan: mostly, details change too rapidly to document, Rakudo is ahead on regexen for example.
01:33 dduncan or a separate question, is there any documentation for Rakudo specifically that says in broad strokes what features of the specced Perl 6 it implements and which it doesn't?
01:33 ascent_ bacek++ # very nice.
01:33 ascent_ ibm-- # for epKe-Alive header.
01:33 dduncan I have seen changelogs that see what was added between releases
01:34 dduncan but I didn't see a "where we are now" summary
01:34 dduncan unless the test suite is that summary
01:34 mberends dduncan: http://www.rakudo.org/status
01:34 dduncan than youk
01:35 mberends :)
01:37 mberends it's amazing what can already be done by current Rakudo :)
01:45 cspencer perl6: say chars("abcdef" > 4)
01:45 p6eval rakudo 9fa0fc: OUTPUT«1␤»
01:45 p6eval ..elf 26016: OUTPUT«Argument "\x{61}\x{62}..." isn't numeric in numeric gt (>) at (eval 125) line 3.␤Undefined subroutine &GLOBAL::chars called at (eval 125) line 3.␤ at ./elf_h line 5863␤»
01:45 p6eval ..pugs: OUTPUT«0␤»
01:46 cspencer what should the answer be in this case?  it's a test in S32-str/length.t supposedly checking char's precedence
01:47 cspencer perl6: say ("abcdef" > 4)
01:47 p6eval elf 26016: OUTPUT«Argument "\x{61}\x{62}..." isn't numeric in numeric gt (>) at (eval 124) line 3.␤␤»
01:47 p6eval ..rakudo 9fa0fc: OUTPUT«0␤»
01:47 p6eval ..pugs: OUTPUT«␤»
01:55 japhb joined #perl6
01:59 nihiliad joined #perl6
02:00 justatheory joined #perl6
02:04 pugs_svn r26017 | putter++ | [elfish/showcode] Updated from elf_f to elf_h, and unbroke the build.
02:04 pugs_svn r26017 | putter++ | The Makefile is much simpler with elf_h.  The build has been broken unnoticed since 2008-06?
02:08 FurnaceBoy joined #perl6
02:08 Tene_ joined #perl6
02:13 mikehh joined #perl6
02:27 meppl good night
02:43 SamB joined #perl6
03:17 dduncan left #perl6
03:41 drbean joined #perl6
04:03 mberends @tell masak proto haz nu hello n conf - plz tri
04:03 lambdabot Consider it noted.
04:06 justatheory joined #perl6
04:14 OuLouFu joined #perl6
04:28 Kisu joined #perl6
05:10 kimtaro_ joined #perl6
06:23 mjk joined #perl6
06:34 finanalyst joined #perl6
06:35 finanalyst morning. I am having a problem making lastest parrot to run with rakudo. Can anyone help?
06:36 alanhaggai joined #perl6
06:37 OuLouFu joined #perl6
06:41 kate21de joined #perl6
07:22 amoc joined #perl6
07:35 amoc rakudo: ok((not ("-a-" ~~ rx:P5/\Ba\B/)), 're_tests 127  (157)');
07:35 p6eval rakudo 9fa0fc: OUTPUT«Could not find non-existent sub ok␤current instr.: '_block14' pc 100 (EVAL_17:48)␤»
07:35 amoc rakudo: (not ("-a-" ~~ rx:P5/\Ba\B/))
07:35 p6eval rakudo 9fa0fc: RESULT«Bool::True»
07:38 amoc rakudo: (<a ab>, <bc ad ba>).comb(m:Perl5/\S*a\S*/)
07:39 p6eval rakudo 9fa0fc: RESULT«["a", "ab", "ad", "ba"]»
07:40 amoc '~'?! it's strange that i just completely recompiled rakudo, and spectests are failed.
07:41 amoc which has passed with ALL OK before.
07:45 jhuni joined #perl6
07:56 DemoFreak joined #perl6
08:07 szabgab joined #perl6
08:28 drbean joined #perl6
08:49 masak joined #perl6
08:54 amoc joined #perl6
09:00 protorom joined #perl6
09:01 protorom left #perl6
09:02 pmurias joined #perl6
09:16 schmalbe joined #perl6
09:54 OuLouFu joined #perl6
10:20 mjk joined #perl6
10:34 ludan joined #perl6
10:34 ludan hi
10:35 masak hello, ludan.
10:35 lambdabot masak: You have 1 new message. '/msg lambdabot @messages' to read it.
10:35 masak @messages
10:35 lambdabot mberends said 6h 31m 47s ago: proto haz nu hello n conf - plz tri
10:35 * masak tris
10:37 masak mberends: cool. will review on the train I'm about to catch in a few minutes. :)
10:45 amoc joined #perl6
10:50 jan_ joined #perl6
11:01 kanru joined #perl6
11:09 mikehh rakudo (9fa0fca) builds on parrot r37794 - make test/make spectest PASS - Ubuntu Intrepid Amd64
11:11 riffraff joined #perl6
11:11 pmurias joined #perl6
11:13 amoc joined #perl6
11:32 sbp joined #perl6
11:32 sbp hey. I'm trying to install Rakudo perl6 on OS X 10.4. I've got as far as installing ICU and trying to install Parrot, but I get a stupid error that's apparently connected with XCode that I can't resolve
11:33 sbp so I'm wondering a) whether to continue trying to resolve that problem, which is pretty architecture specific, or b) trying to install perl6 via an alternative route. what would people here suggest?
11:33 sbp (I should note that I pretty much just followed the directions on the best sites I could find to get a decent perl6 installation working)
11:38 kane_ joined #perl6
11:44 mberends joined #perl6
11:44 mberends_ joined #perl6
11:44 mberends_ left #perl6
11:44 mjk @message
11:44 lambdabot Maybe you meant: messages messages?
11:45 mjk no, i test how to get message
11:45 mberends sbp, quite a few developers here use OSX, but they're away right now. ask again when it's busier.
11:47 sbp mberends: great, thanks
11:47 sbp I'm currently trying parrot from svn, just in case that helps
11:48 sbp per http://perlgeek.de/blog-en/perl​-6/where-rakudo-lives.writeback
11:53 mberends lunch & bbiab
11:54 sbp same error. for the record:
11:54 sbp /usr/bin/libtool: for architecture cputype (16777223) cpusubtype (3) object: /usr/local/lib/libgcc_s.10.4.dylib malformed object (unknown load command 4)
11:54 sbp gmake: *** [blib/lib/libparrot.1.0.0.dylib] Error 1
11:54 sbp (which I think is an XCode thing, but the latest XCode is Leopard only)
11:54 cseong joined #perl6
12:03 meppl joined #perl6
12:04 rob joined #perl6
12:06 rob joined #perl6
12:37 finanalyst if i write a set of rules and place them in a grammar, do i 'use' the grammar to get access to the rules?
12:37 orafu joined #perl6
12:40 mberends finanalyst, your can either ~~ (smartmatch) individual rules/regexen within the grammar, or .parse the grammar, which then starts with regex/rule TOP. afaik, works here.
12:44 finanalyst trying
12:45 mberends finanalyst, http://github.com/mattw/form/b​lob/master/t/04-parseactions.t for .parse() or http://github.com/eric256/perl6-exa​mples/blob/master/lib/Pod/Parser.pm for smartmatch (using given/when).
12:46 Whiteknight joined #perl6
12:49 kane_ joined #perl6
12:51 hisso joined #perl6
12:54 mikehh joined #perl6
12:57 mberends finanalyst, nice example line 117 in http://github.com/viklund/november/blob/​master/lib/Text/Markup/Wiki/MediaWiki.pm
13:02 pmurias joined #perl6
13:06 kanru joined #perl6
13:11 justatheory joined #perl6
13:13 finanalyst mberends: thank you
13:13 finanalyst trying to find the difference between a 'rule' and a 'token'
13:20 mberends finanalyst, S05:1926
13:27 mberends token means regex :ratchet { ... } and rule means regex :ratchet :sigspace { ... }
13:32 finanalyst what is the perl6 equivalent of the perl5 \&subroutine? I tried &name and just name
13:38 skids &subname should work, as long as there are no parens.
13:39 skids But you may want to make a closure depending on how you are using it.
13:42 finanalyst i am trying to compose a pair 'description' => &subname except that subname seems to be called when the pair is being composed
13:50 kimtaro joined #perl6
13:58 FurnaceBoy joined #perl6
13:59 kane_ joined #perl6
14:00 pmichaud finanalyst: the equivalent is &subname
14:03 OuLouFu joined #perl6
14:03 Alias joined #perl6
14:08 dKingston joined #perl6
14:10 finanalyst perl6: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'}
14:10 p6eval pugs: OUTPUT«*** ␤    Unexpected "%a"␤    expecting "=", "::", signature value, context, ":" or "("␤    Variable "&listsub" requires predeclaration or explicit package name␤    at /tmp/2ata96czV9 line 1, column 4␤»
14:10 p6eval ..rakudo 9fa0fc: OUTPUT«listing␤get_iter() not implemented in class 'Integer'␤current instr.: 'parrot;Perl6Array;!STORE' pc 6774 (src/classes/Array.pir:251)␤»
14:10 p6eval ..elf 26017: OUTPUT«/home/evalenv/pugs/m​isc/STD_red/match.rb:141:in `block in to_dump0': undefined method `to_dump0' for true:TrueClass (NoMethodError)␤   from /home/evalenv/pugs/misc/STD_red/match.rb:140:in `each'␤      from /home/evalenv/pugs/misc/STD_red/match.rb:140:in `map'␤       from
14:10 p6eval ../home/evalenv/pugs/mi...
14:11 finanalyst std:my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'}
14:12 finanalyst rakudo:my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'}
14:12 finanalyst rakudo: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'}
14:12 p6eval rakudo 9fa0fc: OUTPUT«listing␤get_iter() not implemented in class 'Integer'␤current instr.: 'parrot;Perl6Array;!STORE' pc 6774 (src/classes/Array.pir:251)␤»
14:13 finanalyst rakudo: my $a=&list; say $a.perl; say $a(); sub list {say 'listing' }
14:13 p6eval rakudo 9fa0fc: OUTPUT«listing␤get_iter() not implemented in class 'Integer'␤current instr.: 'parrot;Perl6Array;!STORE' pc 6774 (src/classes/Array.pir:251)␤»
14:15 finanalyst pmichaud: the line i just sent to rakudo evalbot did not work, but it works with REPL on my computer
14:17 finanalyst std: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub list {say 'listing'}
14:18 p6eval std 26017: OUTPUT«ok 00:03 49m␤»
14:18 finanalyst rakudo: say 'hi'
14:18 p6eval rakudo 9fa0fc: OUTPUT«hi␤»
14:18 finanalyst rakudo: my $a=&list; say $a.perl; say $a(); sub list {say 'listing' }
14:19 p6eval rakudo 9fa0fc: OUTPUT«listing␤get_iter() not implemented in class 'Integer'␤current instr.: 'parrot;Perl6Array;!STORE' pc 6774 (src/classes/Array.pir:251)␤»
14:20 hercynium joined #perl6
14:23 finanalyst rakudo: my $a=&foo; say $a.perl; say $a(); sub foo {say 'listing' }
14:23 p6eval rakudo 9fa0fc: OUTPUT«{ ... }␤listing␤1␤»
14:24 finanalyst rakudo: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub listsub {say 'listing'}
14:24 p6eval rakudo 9fa0fc: OUTPUT«{"list" => { ... }, "exit" => { ... }}␤»
14:24 finanalyst rakudo: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub listsub {say 'listing'}; %a{list}()
14:24 p6eval rakudo 9fa0fc: OUTPUT«{"list" => { ... }, "exit" => { ... }}␤invoke() not implemented in class 'ResizablePMCArray'␤current instr.: '_block14' pc 186 (EVAL_17:61)␤»
14:27 finanalyst rakudo: my %a=('list'=>&listsub,'exit'=>sub {exit}); say %a.perl; sub listsub {say 'listing'}; %a{'list'}()
14:27 p6eval rakudo 9fa0fc: OUTPUT«{"list" => { ... }, "exit" => { ... }}␤listing␤»
14:27 finanalyst rakudo does not like subs named 'list'
14:31 Alias_ joined #perl6
14:32 skids "list" is an operator
14:33 kane_ joined #perl6
14:48 dalek rakudo: 7af829f | pmichaud++ | docs/spectest-progress.csv:
14:48 dalek rakudo: spectest-progress.csv update: 339 files, 7804 passing, 0 failing
14:48 dalek rakudo: review: http://github.com/rakudo/rakudo/commit/7​af829f0aa69845c2f4b6d760b141e8415ff3c35
14:52 sbp okay, I've decided to take a different tack
14:52 sbp because none of the million ways that I tried to fix my libtool / glibtool situation works
14:53 sbp so now I'm going to install the MacPorts parrot...
14:53 sbp and then find some way to get the .git of rakudo to use that
14:53 sbp (don't ask me how)
14:53 Alias joined #perl6
14:58 khisanth_ joined #perl6
15:02 kane_ joined #perl6
15:05 finanalyst rakudo: rule findatab { '<' ~ '>' tab }; my $a='<tab>'; say ?($a~~/<findatab>/)
15:05 p6eval rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'␤current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)␤»
15:06 finanalyst what is wrong with my rule?
15:09 rgs joined #perl6
15:09 Alias_ joined #perl6
15:13 mberends rakudo: rule findatab { '<' tab '>' }; my $a='<tab>'; say ?($a~~/<findatab>/)
15:13 p6eval rakudo 7af829: OUTPUT«1␤»
15:13 mberends what was your ~ doing there ?
15:16 sbp okay, I filed a bug to MacPorts:
15:16 sbp https://trac.macports.org/ticket/19024
15:17 sbp — parrot-1.0.0 fails to install due to libtool
15:18 mberends sbp: good idea. is it right to guess you use a PPC processor, not an Intel?
15:19 sbp nope, Intel
15:20 sbp it's a 2006 MacBook
15:20 finanalyst mberends: The ~ operator is a helper for matching nested subrules with a specific terminator as the goal. S05
15:20 kane_ joined #perl6
15:22 xinming joined #perl6
15:25 pmichaud rakudo:  rule findatab { '<' ~ '>' 'tab' };  my $a = '<tab>';  say ?($a~~/<findatab>/)
15:25 p6eval rakudo 7af829: OUTPUT«1␤»
15:25 pmichaud note that   tab !==  'tab'
15:25 finanalyst why???
15:26 pmichaud tab*   matches  tabbbbbbb
15:26 pmichaud 'tab'*  matches  tabtabtabtab
15:26 pmichaud so      '<' ~ '>'  tab    matches     <t>
15:26 pmichaud actually,   <t>ab
15:26 finanalyst ahhh
15:33 finanalyst rule findatab { '<' ~ '>' 'tab' .* };  my $a = '<tab stuff>';  say ?($a~~/<findatab>/)
15:34 finanalyst rakudo: rule findatab { '<' ~ '>' 'tab' .* };  my $a = '<tab stuff>';  say ?($a~~/<findatab>/)
15:34 p6eval rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'␤current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)␤»
15:35 pmichaud if you want 'tab' plus other stuff in the brackets, you need
15:35 pmichaud '<' ~ '>' [ tab .* ]
15:36 finanalyst rakudo: rule findatab { '<' ~ '>' [tab .*] };  my $a = '<tab stuff>';  say ?($a~~/<findatab>/)
15:36 p6eval rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'␤current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)␤»
15:37 pmichaud oh.
15:37 pmichaud the .* won't work because it's ratcheted
15:37 pmichaud rakudo: rule findatab { '<' ~ '>' [tab .*] };  my $a = '<tab stuff>';  say ?($a~~/<findatab>/)
15:37 pmichaud rakudo: rule findatab { '<' ~ '>' [tab .*!] };  my $a = '<tab stuff>';  say ?($a~~/<findatab>/)
15:37 p6eval rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'␤current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)␤»
15:37 p6eval rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'␤current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)␤»
15:37 pmichaud rakudo: rule findatab { '<' ~ '>' [tab .*!]! };  my $a = '<tab stuff>';  say ?($a~~/<findatab>/)
15:37 p6eval rakudo 7af829: OUTPUT«Syntax error at line 1, near "};  my $a "␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:83)␤»
15:38 pmichaud hmmmm.
15:38 pmichaud rakudo: rule findatab { '<' ~ '>' [tab .*!]:! };  my $a = '<tab stuff>';  say ?($a~~/<findatab>/)
15:38 p6eval rakudo 7af829: OUTPUT«Unable to parse findatab, couldn't find final '>'␤current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)␤»
15:38 pmichaud rakudo: rule findatab { '<' ~ '>' [ tab <-[>]>* ] };  my $a = '<tab stuff>';  say ?($a~~/<findatab>/)
15:38 p6eval rakudo 7af829: OUTPUT«1␤»
15:38 pmichaud okay, that's better.
15:40 finanalyst what is the <-[>]>* and why is .* not possible?
15:41 pmichaud <-[>]>   matches zero or more characters that aren't '>'
15:41 pmichaud (er,  <-[>]>* ...)
15:41 pmichaud .* isn't possible because it doesn't backtrack
15:41 finanalyst ok now i see.
15:41 pmichaud it would be the same problem with
15:41 pmichaud '<'  [ tab .* ] '>'
15:42 pmichaud we'd never match the final '>', because the .* would have already matched it.
15:42 pmichaud (no backtracking in rules or tokens)
15:44 finanalyst rakudo: regex findatab {'<' ~ '>' [tab .*]}; say ?('<tab  stuff>'~~/<findatab>/)
15:44 p6eval rakudo 7af829: OUTPUT«Unable to parse , couldn't find final '>'␤current instr.: 'parrot;PGE;Match;FAILGOAL' pc 2927 (compilers/pge/PGE/Regex.pir:456)␤»
15:44 finanalyst regex has no backtracking?
15:44 pmichaud regex does, but goal regexes have some odd semantics.
15:45 pmichaud unless S05 has changed, the way it's defined it somewhat implies a "no backtrack" on the internal expression.
15:46 pmichaud although I think I was supposed to change it.  Let me review the logs.
15:48 pmichaud yes, I was supposed to change it.  I'll do that today.   (http://irclog.perlgeek.de/​perl6/2009-01-14#i_832617)
15:51 Tene joined #perl6
15:55 khisanth_ joined #perl6
16:15 cognominal joined #perl6
16:27 pmichaud std: my @a;  @a.grep { $_ < 3 };
16:27 p6eval std 26017: OUTPUT«##### PARSE FAILED #####␤Unexpected block in infix position (two terms in a row, or previous statement missing semicolon?) at /tmp/983T8OAeCQ line 1:␤------> [32mmy @a;  @a.grep [31m{ $_ < 3 };[0m␤    expecting any of:␤       infix or meta-infix␤      infix stopper␤    standard
16:27 p6eval ..stopper␤ ter...
16:35 bigpresh joined #perl6
16:46 Psyche^ joined #perl6
16:52 Khisanth joined #perl6
16:59 ejs joined #perl6
17:02 Limbic_Region joined #perl6
17:03 msmatsko joined #perl6
17:21 jhorwitz joined #perl6
17:27 M_o_C joined #perl6
17:27 Alias_ joined #perl6
17:31 literal where's masak these days?
17:32 diakopter @seen masak
17:32 lambdabot I saw masak leaving #perl6 6h 51m 31s ago, and .
17:34 literal mberends: what's the status of your Perl 6 Pod::Parser?
17:50 mberends literal: most recently I built it in into a local webserver that can render any Pod file on your local drive. It handles common Pod 5 as well. http://planetsix.perl.org/ currently talks about it. Install http://github.com/eric256/​perl6-examples/tree/master and give it a try :)
17:52 literal mberends: I was wondering how useful it would be for this: http://groups.google.com/group/tpf-gsoc-stu​dents/browse_thread/thread/9bdc2409fa51e4e3
17:54 mberends literal: great! this code would be quite usable for that, and the workout will stimulate more development.
17:54 literal ok, great
17:54 literal maybe you could reply to that post?
17:56 mberends must create a Google account first, then yes, I'll reply.
17:59 szabgab what is the nick of Hinrik ?
17:59 szabgab ah literal :-)
18:00 szabgab hi
18:01 literal heh
18:01 szabgab so I was wondering what should I write as a sample plugin in Perl 6
18:01 szabgab is there any code of psi already somewhere ?
18:06 literal don't think so
18:06 literal maybe masak has written something
18:10 mberends szabgab, literal: recently masak has been concentrating on Web.pm
18:11 literal ok
18:11 sbp joined #perl6
18:18 dKingston joined #perl6
18:20 lisppaste3 joined #perl6
18:48 mberends literal: replied. Just seeing if I can run up a server daemon for you to browse...
18:49 rindolf joined #perl6
19:00 mberends literal: for example, http://10.31.13.56:8080/home/rakud​o/rakudo/docs/guide_to_setting.pod and the rest of the dirs/files, only the port is actually 2080 so that bots cannot follow the link.
19:01 cj mberends: erhm, bots can't follow it any, since nobody will route 10/8 :)
19:01 mberends :/
19:01 cj anyway*
19:02 mberends http://autoexec.demon.nl:8080/home/ra​kudo/rakudo/docs/guide_to_setting.pod
19:07 literal nice
19:07 mberends that's from Pod 5 source, whilst it's a Pod 6 parser :)
19:08 literal yeah
19:09 literal can you show me how it renders S26-documentation.pod ?
19:09 * mberends searches...
19:10 szabgab mberends, is that slow or just does not like me personally ?
19:11 ejs joined #perl6
19:11 literal the initial loading was slow here as well
19:11 mberends it's not you ;) it is slow indeed. and that for a stream-based parser is worrying.
19:15 mberends szabgab, literal: performance measurements http://gist.github.com/83138
19:16 SamB joined #perl6
19:16 szabgab timed out for me
19:17 mberends :(
19:20 mberends S26 is about 70K, so a time of 5-10 minutes is expected. Currently I'm looking to replace the stream-based with a tree-based parser in the hope that the regex engine's inner loops are faster than Rakudo's outer loops.
19:21 orafu joined #perl6
19:22 mberends ah. S26 finished here after some 5 minutes with the output truncated to the first 1k or so of xhtml.
19:27 literal heh
19:27 mberends 'make test' was taking about 50 seconds for 47 small documents in January, but lately has risen to about 150 seconds.
19:28 literal is that due to changes in Rakudo/Parrot or Pod::Parser?
19:30 mikehh how about make spectest without threading - it was about 15mins - now about 35 for me :-{
19:30 mberends Probably the former, Pod::Parser didn't change significantly. There has been some discussion about performance in #perl6 and #parrot.
19:30 mikehh ok there are a few more tests - but still
19:32 SamB joined #perl6
19:35 mberends 12K, just over a minute: ...:/home/rakudo/pugs/docs/Perl6/Spec/S28-special-names.pod
19:39 mberends that last request took 297M RAM and 67 secs
19:40 literal that's quite a bit
19:41 literal looks like it didn't parse the whole document though
19:41 hercynium joined #perl6
19:41 literal this one is longer: http://perlcabal.org/syn/S28.html
19:42 mberends the same final sentences...
19:43 literal hm?
19:45 dduncan joined #perl6
19:45 mberends the content appears to match, just the markup style differs.
19:46 mberends unless you had a timeout :/
19:46 literal what do you mean? your parse ends right before the "Perl5 to Per6 special variable translation"
19:46 literal I tried reloading the page and I get the same output
19:47 mberends the browser here goes right to the end from both URLs
19:47 literal odd
19:47 mberends flaky--
19:53 szabgab rakudo: say q(abc)
19:53 p6eval rakudo 7af829: OUTPUT«abc␤»
19:53 szabgab rakudo: say q(ab(c)d)
19:53 p6eval rakudo 7af829: OUTPUT«Statement not terminated properly at line 1, near "d)"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:83)␤»
19:54 literal rakudo: say �foo #[bar] baz�
19:54 p6eval rakudo 7af829: OUTPUT«say requires an argument at line 1, near " \ufffdfoo #[ba"␤␤current instr.: 'parrot;PGE;Util;die' pc 129 (runtime/parrot/library/PGE/Util.pir:83)␤»
19:54 literal rakudo: say <foo #[bar] baz>
19:54 p6eval rakudo 7af829: OUTPUT«foo#[bar]baz␤»
19:57 ZuLuuuuuu joined #perl6
20:01 lucs_ joined #perl6
20:02 lucs Can I play with rakudo evaluations in a private channel?
20:04 rindolf joined #perl6
20:05 diakopter lucs: I don't think p6eval is set up for that, but I imagine that wouldn't be too difficult of a change...
20:05 diakopter oh look, it is
20:06 diakopter /msg p6eval rakudo: say "hi"
20:06 lucs Excellent! Thanks.
20:11 diakopter moritz_++ and whoever else
20:12 OuLouFu joined #perl6
20:13 szabgab literal, Padre::Plugin::PSI was uploaded to CPAN
20:13 literal nice!
20:13 szabgab of course it only counts the characters in your current file, but it does so in Perl 6
20:14 literal that's a start :)
20:22 sbp okay, for anyone following my Rakudo Saga earlier, I managed to resolve it by getting Xcode 2.5 from http://connect.apple.com/cgi-bin/WebObjects/​MemberSite.woa/wa/getSoftware?bundleID=19907 and then using the following installation method:
20:23 sbp $ git clone git://github.com/rakudo/rakudo.git
20:23 sbp $ cd rakudo && perl Configure.pl --gen-parrot
20:23 sbp $ gmake
20:23 sbp quite simple really
20:23 sbp thanks for the encouragement
20:23 sbp left #perl6
20:26 szabgab literal, do you have a web site or a blog I can link to ?
20:26 literal http://blog.nix.is
20:37 szabgab thanks, journaled
20:54 [bjoern] joined #perl6
20:56 sbp joined #perl6
20:57 [bjoern] yo sbp!
20:57 sbp why hello there [bjoern]...
20:57 [bjoern] What is thy bidding?
20:57 sbp well I just installed Rakudo
20:57 [bjoern] cool
20:57 sbp and I'm trying to write a p6grep, à la pcregrep
20:58 sbp it should be quite easy, but I have a problem
20:58 eternaleye joined #perl6
20:58 sbp where I'm doing if $line ~~ /pattern/, the regex works when it's /literal/
20:58 sbp but if I try to use /<$pattern>/, it doesn't work
20:59 sbp I'm wondering if variable interpolation into regexps isn't supported yet in rakudo
20:59 sbp or if I'm doinitwrong
20:59 sbp (the error I get is: Statement not terminated properly at line 9, near "~~ /<$patt")
21:00 [bjoern] paste the code to http://sial.org/pbot/perl6 ?
21:00 mberends sbp, the $pattern dos *not* interpolate by design.
21:00 sbp mberends: I thought it was true that /$pattern/ does not interpolate
21:00 sbp mberends: but that /<$pattern>/ *does*
21:01 pasteling "sbp" at 86.8.186.21 pasted "p6grep.pl" (12 lines, 248B) at http://sial.org/pbot/35731
21:01 mberends yes, afaik $pattern contains the name of another regex
21:01 sbp oh, the name? hmm
21:01 sbp I thought the content
21:01 [bjoern] so how do you turn a string into a regex?
21:02 donaldh joined #perl6
21:02 mberends it seems to be discouraged by design, maybe to avoid tainting
21:02 literal eval it?
21:03 sri_kraih joined #perl6
21:04 literal grammars and classes share the same namespace, right?
21:05 literal their package names, that is
21:05 mberends yes
21:07 mberends sbp, I said it wrong, $pattern contains a regex object or literal characters
21:08 [bjoern] so if it's a string it's as if all the special character are escaped?
21:09 mberends but a * in $pattern always means '*', never repeat count.... yes
21:10 mberends S05:923 =head1 Variable (non-)interpolation
21:18 [bjoern] So how would you use eval to do it? Code snippet for the evalbot?
21:31 literal rakudo: my $line = 'foo bar'; my $rx = 'fo\w bar'; eval "say 'yay' if \$line ~~ /$rx/"
21:31 p6eval rakudo 7af829: RESULT«Match.new(␤ # WARNING: this is not working perl code␤ # and for debugging purposes only␤ ast  => "",␤ text => "",␤ from => 7,␤ to   => -2,␤)»
21:31 literal or something
21:33 fridim_ joined #perl6
21:35 Limbic_Region joined #perl6
21:46 ejs joined #perl6
22:07 mikehh joined #perl6
22:10 icwiener joined #perl6
22:12 ZuLuuuuuu left #perl6
22:24 pugs_svn r26018 | hinrik++ | [util/perl6.vim] use vim's Include highlighting for the 'use' and 'require' keywords
22:25 bacek good morning
22:25 [bjoern] left #perl6
22:28 dduncan left #perl6
22:32 nihiliad joined #perl6
22:33 kate21de joined #perl6
22:40 frioux joined #perl6
22:40 frioux s1n: ping?
22:49 destiney joined #perl6
22:50 gdonald joined #perl6
23:03 pugs_svn r26019 | putter++ | [elfish/showcode] Add .notes{} info to the IR pane.
23:03 pugs_svn r26019 | putter++ | [elf_h] Add Any::object_id.  Sync elf_h with elf_h_src.  Tweak README.
23:04 orafu joined #perl6
23:28 kate21de joined #perl6
23:54 frioux rakudo: 5|6 + 7
23:54 p6eval rakudo 7af829: RESULT«any(5, 13)»
23:54 frioux rakudo: 5|6 + 7&8
23:54 p6eval rakudo 7af829: RESULT«any(5, all(13, 8))»
23:57 frioux (1,2,3,4,5,6,7).grep: {$_ < 4}
23:57 frioux rakudo: (1,2,3,4,5,6,7).grep: {$_ < 4}
23:57 p6eval rakudo 7af829: RESULT«[1, 2, 3]»

| Channels | #perl6 index | Today | | Search | Google Search | Plain-Text | summary

Perl 6 | Reference Documentation | Rakudo