pugscode.org | sial.org/pbot/perl6 | ?eval [~] <m oo se> | We do Haskell, too | > reverse (show (scanl (*) 1 [1..] !! 4))
Set by agentzh on 17 April 2007.
TimToady cmarcelo: I think Sage would be okay with it. On the other hand, I'll take a Haskell translator over no translator any day 16:34
fglock cmarcelo: it's not haskell
TimToady and indeed, a Python irclogger is better than nothing... :/
moritz but don't expect it to be working very soon 16:35
the logging part seems to work, basically 16:36
now for the output...
cmarcelo fglock: ?? I was refering to a hs2p6 recently commited somewhere in the pugs tree.. 16:37
fglock no, that wasn't me
[particle] cmarcelo: never heard of it
cmarcelo misc/pX/Common/hs2p6/, it's from pmurias 16:42
fglock back in 3h & 16:43
svnbot6 r16018 | fglock++ | kp6 - fixed bind; added test
devbot6 dev: Ticket #22 (task created): Perl 5 to Perl 6 translator <dev.pugscode.org/ticket/22> 16:46
kolibrie moritz: if you want to write it in p6, you can look at examples/network/evalbot/evalbot.pl for an example 16:48
moritz kolibrie: I decided against perl6 because atm there are too many problems with my pugs builds... 16:49
kolibrie: and I dont know if DBI works in p6
kolibrie moritz: I haven't used DBI under p6, but the bindings are there to do it 16:50
moritz kolibrie: right, but I want fast results ;-)
TimToady if you want fast results why are you hanging around near Perl 6? :)
kolibrie lol
offby1 We will sell no language .... << long pause; swirls wine in glass >> ... before its time 16:51
TimToady we'll gladly sell futures in it though...
moritz TimToady: ;-)
TimToady: because some day, hopefully, p6 will enable me to get results fast 16:52
jrockway heh, options.perl.org # buy options on the perl6 release date, benchmark results, etc. 16:55
moritz jrockway: good marketing idea ;-) 16:56
TimToady audreyt++ # [PATCH] Add Tolkien quote to mro.c [perl5-porters] 16:59
avar parrot needs more alice in wonderland quotes 17:00
jrockway the russian in main.hs (i think) crashed my emacs when i was first examining the code :) 17:04
moritz my very first attempt: 17:20
moritz.faui2k3.org/irclog/out.pl?channel=perl6;
lambdabot Title: IRC log for #perl6
moritz currently I'm gathering the data on a different maschine than the server (because the server has no Net::IRC)... 17:21
so it is not updated automatically
but that will come soon
avar moritz: pocoirc is way better:) 17:36
moritz avar: do you have a link for me? 17:38
ok, found the SVN repository 17:41
"Note that using this module requires some familiarity with the details of the IRC protocol. I'd advise you to read up on the gory details of RFC 1459 17:42
not too promising for a quick start, eh? 17:43
test 18:14
yay, basic functionality is there
OwlEye test: umlaute: ä ü ö 18:23
moritz OwlEye: they work for me 18:25
OwlEye and in your log bot? :P
moritz OwlEye: that's what I'm talking about
OwlEye oh, nice!
moritz OwlEye: see moritz.faui2k3.org/irclog/out.pl?channel=perl6;
lambdabot Title: IRC log for #perl6
moritz more unicode test: ģˆ˜ė„ģæ  18:26
OwlEye even formatted :)
svnbot6 r16019 | kudra++ | Another summary bites the dust
OwlEye and UTF-8 seems to work too
moritz OwlEye: just a simple table
OwlEye very well done 18:27
moritz non-utf-8 would be more interesting right now
especially latin-1
OwlEye we just spoke about it and you already have results :D
moritz that's perl
OwlEye mine was non-UFTC-8
moritz cool
OwlEye i use ISO-8859-15
moritz which is latin1, except for a few characters (like € iirc) 18:28
OwlEye yes i think you are right
audreyt irc.pugscode.org now redirects there.
autosmoke.pugscode.org now redirects to perlcabal.org/smoke.html 18:29
lambdabot Title: TAP Matrix - Thu Apr 19 14:39:13 2007 GMT
moritz audreyt: you're a big fan of hostnames, right? 18:30
audreyt right.
rindolf Hi all.
moritz hi rindolf ;_)
TimToady audreyt: are you going to YAPC::NA? or do you know if there's any hackathoning going on around it? 18:31
OwlEye audreyt, irc.pugscode.org does not let me in
TimToady trying to figure out planes...
audreyt TimToady: no, in OSDC.tw it turns out folks are skipping Houston for some reason
weather perhaps?
rindolf audreyt: can you point me to some good CPAN modules for doing some OO tricks? Here's what I have so far - www.shlomifish.org/perl-oop-systems...ummary.txt 18:32
audreyt dunno about hackathon... I'm still massively backlogging on mail and stuff
TimToady I know the feeling
kolibrie I'm planning on YAPC::NA, but cannot stay this year for a hackathon :( 18:33
OwlEye thats in Houston, TX, aye? 18:37
kolibrie correct
audreyt yeah
OwlEye will any of you attend the DebConf by chance? 18:38
svnbot6 r16020 | kudra++ | The story so far
TimToady audreyt: how's ingy doin'? 18:43
audreyt TimToady: still pending two operations (one chest, one wrist). 18:44
TimToady you mentioned "spine" at first, how's that?
rindolf I'm going to kill Ask Bjorn Hansen!
audreyt it seems to be fixed, or at least stabilized, atm 18:45
rindolf He still hasn't uploaded XML::RSS 1.30!
audreyt rindolf: if you kill him, he won't upload it ever after.
rindolf audreyt: yes.
audreyt: I was joking.
audreyt: he also has been relatively unresponsive.
geoffb somehow death is not funny with ingy in surgery 18:46
rindolf geoffb: oh.
geoffb: it's an expression, and I didn't know.
What's wrong with ingy?
geoffb serious car accident
moritz rindolf: car accident
rindolf Wow!
Was he driving? 18:47
Or in a car?
audreyt was driving motorbike. more details later.
rindolf Oh.
Motorbikes are very dangerous.
pmurias testing out the new irc log ;) 19:58
fglock pmurias: what is the url? 20:01
moritz actions (with /me) are still not logged :(
fglock: irc.pugscode.org or moritz.faui2k3.org/irclog/
lambdabot Title: IRC logs
fglock moritz: thanks 20:02
moritz fglock: np
if somebody hides from the log, and nobody notices, does the tree really fall? 20:07
fglock hmm - the changes in kp6 containers broke OO
pmurias fglock: hi 20:08
fglock hi
pmurias does ghc have a test suit? 20:10
fglock hackage.haskell.org/trac/ghc/wiki/B...nningTests 20:11
lambdabot Title: Building/RunningTests - GHC - Trac
OwlEye lichtkind, yay! 20:15
lichtkind OwlEye: owl lange nich gesehen
OwlEye lichtkind, yeah! how have you been my dear friend?
lichtkind renormalist: steffen? 20:25
pmurias good night& 20:28
lichtkind goo nicght 20:30
lumi moritz: The logger had a hiding feature, actually 20:33
moritz lumi: lots of them ;-) 20:34
lumi: currently only "plain messages" are logged :(
lumi moritz: So not actions or.. what.. notices? 20:35
moritz lumi: no actions, joins, leaves, kicks, topic changes etc.
lumi moritz: I meant the previous one, not the shiny new one
Oh right, I mentally blank them
moritz lumi: ok
lumi: was it something like "all lines starting with $marker are ignored"? 20:36
lumi moritz: Yes 20:37
Something like [off]
I think
moritz lumi: I can implement that, it's a one-liner 20:38
[off] ignore test (only on new bot) 20:41
and now without ignore...
?eval 1 20:51
evalbot_r16020 1
fglock would it be an oversimplification if containers and values were just a special kind of objects? 20:53
or they already are
hmm - per S12, it seems containers have an underlying object 20:55
which means I can integrate MOP and containers 20:56
audreyt they already are.
a Scalar container is just a variable bound to a normal Scalar object.
fglock audreyt: hey :)
audreyt you get to that object with VAR($x)
fglock yup
audreyt so, in short, yes. 20:57
fglock thanks
audreyt np :)
fglock & 21:02
masak S05 still contain regexes on the form s/.../.../; I thought these were all replaced by s[...] = ...; but maybe the old form is still valid? 21:12
moritz one might think that if $larry (or somebody else) would deprecate and remove such a feature, that he greps through the specs and removes all occurences... 21:16
so probably it's still allowed
masak moritz: just making sure
what's fail do outside of a regex?
?eval sub a { fail }; a
evalbot_r16020 *** Failed␤ at <eval> line 1, column 9-14 21:17
moritz masak: I'm not sure as well ;-)
?eval my $f = "abc"; $f ~~ s/^a.//; $f 21:18
evalbot_r16020 \\"c"
masak throws an exception, it seems
moritz well, it... fails ;)
masak moritz: seems like reasonable semantics, given the name :) 21:19
Tene ?eval sub f { fail }; my $b = f(); "Goodnight World" 21:20
evalbot_r16020 "Goodnight World"
masak moritz: so I guess the regex itself can be considered a try block of sorts, since it catches this failure ordinarily and does nothing
moritz sounds reasonable 21:27
masak how is <ws> implemented? seems it must "go outside of itself" to gain enough information about what surrounds it 21:33
moritz masak: with <before.. > and <after...> assertions?
masak moritz: ah
yes.
moritz <before \\w>\\s+<after \\w> | \\s* 21:34
or something of the like
ok, that's wrong
;)
masak but the theory works
moritz right
PerlJam The trick is to stop thinking of <ws> as a regular expression. It's code. With full access to the string. 21:35
moritz <!before \\w>\\s*<!after \\w> | \\s+ perhaps
masak hm, yes
moritz PerlJam: well, it kinda _is_ a regex - but a regex can do more than just looking at the given string
masak PerlJam: I was just curious as to the implementation if one wanted to implement the regex engine without cramming too much extralinguistic magic into it 21:36
PerlJam masak: Check the innards of PGE. It implements <ws> 21:37
masak <before.. > and <after...> seems to be the answer I was looking for
PerlJam: thx, I will
lichtkind gnight boysngirls 21:54
moritz lichtkind: 'night 21:55
lichtkind :)
TimToady masak: yes, s/foo/bar/ is still valid; it's only the bracketed form that uses pseudoassignment instead. 21:59
also, both this and <ws> have rules in src/perl6/Perl-6.0.0-STD.pm already showing the intent of the spec (I hope). 22:00
though of course <ws> for parsing Perl is not the same as <ws> in general, given we also have to recognize "unspace" and pod 22:01
and also insert any pending heredocs at the line boundary 22:02
PerlJam heh ... come to think of it, perl 6 put's python's semantic whitespace to shame ;>
masak TimToady: why was the bracketed form changed to use pseudoassignment?
TimToady just to make a mechanism to have any old expression on the right, and avoid brackets that look like some other construct that are just quotes 22:04
as a bonus it gets us += and such
masak TimToady: so s[...][...] still works as well? 22:05
TimToady ?eval my $_ = "0 1 2 42"; s:g[\\d+] += 1; $_
evalbot_r16020 \\"0 1 2 42"
TimToady hmm.
no, that form is no longer allowed 22:06
masak why not?
TimToady it was causing some kind of parsing problem, don't remember offhand
Tene ?eval my $_ = "1 2 3 4"; s:g[\\d+] = 137; $_
evalbot_r16020 \\"1 2 3 4"
TimToady seems a bit busted 22:07
Tene ?eval $s = "1 2 3"; $f ~~ s:g/\\d/5/; $f
evalbot_r16020 \\undef 22:08
Tene ?eval $s = "1 2 3"; $s ~~ s:g/\\d/5/; $s
evalbot_r16020 \\"1 2 3"
Tene ?eval $s = "foo"; $s ~~ s/foo/moose/; $s
evalbot_r16020 \\"moose"
TimToady ?eval my $_ = "0 1 2 42"; s:g[<digit>+] += 1; $_ 22:09
evalbot_r16020 *** Cannot parse regex: <digit>+␤*** Error: ␤\\"0 1 2 42"
TimToady ?eval my $_ = "0 1 2 42"; s:g[<[0..9]>+] += 1; $_
evalbot_r16020 \\"0 1 2 42"
TimToady integration with the regex engine has never been pugs' strong point... 22:10
Tene ?eval my $_ = "foo"; s[foo] = "duck"; $_
evalbot_r16020 \\"duck" 22:11
Tene ?eval my $_ = "a b c"; s[\\w] ~= "z"; $_
evalbot_r16020 \\"za b c"
Tene ?eval my $_ = "a b c"; s:g[\\w] ~= "z"; $_ 22:12
evalbot_r16020 \\"a b c"
TimToady very strange
Tene ?eval my $_ = "0 1 2 42"; s[\\d+] += 1; $_
evalbot_r16020 Out of memory!
moritz wtf?
TimToady $_ = "foo"; s[fo*] = "duck"; $_
?eval $_ = "foo"; s[fo*] = "duck"; $_ 22:13
evalbot_r16020 \\"duck"
TimToady not your first append append z before the match
*note
so I guess it's recursing on the ^ location
though how what you said differs from what I said earlier, I dunno... 22:14
oh, you left out the :g
hmm
Tene I dropped the... yeah
because s[\\w] works and s:g[\\w] doesn't 22:15
TimToady except s[\\w] didn't work right
shoulda put the z after the a
Tene Oh, right. 22:16
?eval my $_ = "0 1 2 42"; s[\\d] += 1; $_
evalbot_r16020 \\"10 1 2 42"
TimToady Match is true but it's getting the wrong location out of it, I guess. 22:17
moritz ?eval my $_ = "0 1 2 42"; s[\\d] = 1 + ~ $/; $_
evalbot_r16020 \\"10 1 2 42"
moritz ?eval my $_ = "0 1 2 42"; g:s[\\d] = 1 + ~ $/; $_ 22:18
evalbot_r16020 Error: No such subroutine: &g
moritz ?eval my $_ = "0 1 2 42"; s:g[\\d] = 1 + ~ $/; $_
evalbot_r16020 \\"0 1 2 42"
moritz ?eval my $_ = "0 1 2 42"; s:g[(\\d)] = 1 + $0; $_ #my last try ;)
evalbot_r16020 \\"0 1 2 42"
TimToady ?eval $_ = "foo"; s[\\w] = (say $/);
evalbot_r16020 OUTPUT[␤] Bool::True 22:19
TimToady ?eval $_ = "foo"; s[\\w] = (say $/.perl);
evalbot_r16020 OUTPUT[\\Match.new(␤ ok => Bool::True, ␤ from => 0, ␤ to => 0, ␤ str => "", ␤ sub_pos => (), ␤ sub_named => {}␤)␤] Bool::True
TimToady yes, from and to are wrong.
geoffb Pugs is using PCR these days, isn't it? Perhaps out-of-date linkage? 22:20
Tene ?eval my $_ = "duck"; s[(\\w)] = (say $/.perl)
evalbot_r16020 OUTPUT[\\Match.new(␤ ok => Bool::True, ␤ from => 0, ␤ to => 0, ␤ str => "", ␤ sub_pos =>␤ (Match.new(␤ ok => Bool::True, ␤ from => 0, ␤ to => 0, ␤ str => "", ␤ sub_pos => (), ␤ sub_named => {}␤ ),), ␤ sub_named => {}␤)␤] Bool::True
TimToady maybe it's time to run a smoke...
could also be svk damage on feather, I suppose 22:22
geoffb Did clkao ever figure out what caused feather's svk to be borken? 22:23
Tene We just need to find a way to get svk to damage things more creatively, causing tests to unexpectedly pass instead of fail. ;) 22:24
TimToady we need a room full of monkeys for that. 22:25
"To be or not to be, that is the gvrklsjbxx." # a near miss
Tene Although... if svk has changed some code... does that count as submitting a patch? And if so, should we send it a commit bit? 22:27
geoffb Why discriminate against non-carbon intelligence? Silicon has rights, too! 22:28
TimToady and now that it can lase, it also has mights! 22:29
erg, my smoke appears to be looping on propcharset. why am I not surprised... 22:58
anybody remember what the ulimit is set to for individual tests? 22:59
that test usually finishes in 5 min, and it's up to 12 already...
hmm, looks like not limited by default 23:02
and just as I was about to kill it, it went away on its own, after 15 min runtime 23:03
so something 3x slower, it would seem
s:2nd/<sp>/ is / 23:04
ah, no, it's my stupid computer running at reduced speed for some reason. 23:05
jrockway power saving
?
TimToady must think it's on battery
800Mhz kinda sucks 23:06
veritos larry: what is your pc anyway?
moritz is there a decent documentation for Irssi.pm anywhere?
TimToady an intel laptop; but it's probably just the Fedora confused about coming back from suspend
dmq pasted "new char class macros" (162 lines) at paste.husk.org/8159 23:14
timtoady: looks like i will be able to do perl6 style \\v\\V \\h\\H after all 23:15
and maybe make perl5 faster at handling \\s at the same time. 23:17
moritz foo 23:30
TimToady bar 23:31
Tene goose
dmq you gotta admit those are pretty funky tests 23:32
TimToady gander
I sincerely hope they are automatically generated. 23:34
dmq naturally. :-)
you made Perl real suitable for stuff like that. 23:35
doesnt have to be an evil ternary either. ive been thinking maybe functions would be better. 23:36
btw, that code really made me appreciate how logical operators work in Perl as compared to C. 23:37
it would be nice to be able to change stuff like ((X) ? 2 :0) into (X) && 2 23:38
TimToady btw, s:g[\\d+] += 1; works fine in my copy, so it must be feather having trouble. 23:40