#perl - Tue 1 May 2007 between 18:13 and 18:27



Aankhen``eval: my @foo = qw/a b/; my @bar = qw/a b c/; [ @foo & 1, @bar & 1 ]
buubotAankhen``: [0,1]
Ani-_Aankhen``: until I got some syntax errors yes. Which were not easy to find :)
Aankhen``Heh.
Well, thank you. ^_^
Ani-_Aankhen``: but it needs a second version...
Aankhen``: B::Deparse:: gets loaded because of Data::Dumper but that doesn't mean it is being defined in Data::Dumper :/
Aankhen``True.
Same for warnings::register and Tie::Hash, right?
Ani-_Yes
But fixing that is not that easy :/
Well, fixing it for one level is easy enough, but not for two.
As in, to fix B::Deparse you could simply check $INC{'B/Deparse.pm'}; but if B/Deparse.pm also has: package B::Deparse2; then it will still show Data/Dumper.pm
actionCPAN upload: MooseX-Method-0.22 by BERLE
CPANupload: MooseX-Method-0.22 by BERLE
phoulBinGOs: you still here?
Ani-_Aankhen``: fixing all that is up to you. :)
LeoNerdhttp://paste.leonerd.org.uk/?show=589 <== A really odd test failure, on the string vs. int value of $!.. Anyone any ideas?
Aankhen``Ani-_: Thank you for what you have. =)
Ani-_Aankhen``: I expect a fully working version on CPAN within 24 hours!
Aankhen``Nah, too lazy for that.
'Sides, I'm working on my bot for now.
phoulAankhen``: i hate to bug you again...
Aankhen``Probably do some more Moose hacking later.
Ani-_Aankhen``: YOU LAZY BASTARD! :(
phoulBut how would i go about implimenting a kick command? i tried $irc->yield( kick => CHANNEL, "KICK $1"); & that doesnt work i also tried with privmsg...
Aankhen``Phoul: I don't mind helping you, but do remember that there are a *lot* of far more experienced Perl programmers in this channel, so if you ask a general question, you're more likely to get a useful answer. :-)
Ah, PoCo-IRC.
Ani-_I want you to fix it because I can't :(
Aankhen``Phoul: Okay, I cannot help you with reading the docs.
phoulits just the RFC command i need
=\
Aankhen``Phoul: Aren't you using POE::Component::IRC?
phoulYes
Aankhen``Then why in the name of all that is good would you need the RFC command?
phoul=\ good question
Aankhen``perldoc POE::Component::IRC, see the "kick" command.
LeoNerdeval: local $! = 10; "$!"
buubotLeoNerd: No child processes
phoulirc_kick
?

Page: 3 10 17 24 31 38 45 52 59 66 73 80 87 94 101 

IrcArchive