| |
| |
| |
|
Page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
Comments:
<0> I figured out how to MASTER WORD 2003!
<1> uber_spaced: Oh, ok ;)
<2> japhy, turn off all of the bull**** that's supposed to make it different from it's previous versions?
<0> heh, no, but they did of course change menus around and all that good ****
<3> syswrite({$socks[0]},"test 123") gives me: Odd number of elements in anonymous hash at tcpclient.pl line 266.
<4> Yes, it will do
<4> { foo } is the anonymous hashref constructor
<2> japhy, in order to justify having "administrative ***istants" go through mediocre and demeaning ms office training?
<0> let me just say this: printing a CD booklet on glossy paper and then going to kinkos to cut and staple it on your own is ****ing AWESOME
<4> { key => value, key => value, ... }
<0> I made two CD booklets. they look, dare I say, professional.
<3> LeoNerd: how to simply add the sock to the array then ?
<1> blehhhhh: Oh, you should use {} for print statements.
<0> blehhhhh: there's no need for {}'s around $socks[0] there
<3> but syswrite({$socks[0]},"test 123") is not accepted ..
<3> ok
<0> syswrite($socks[0], "test 123");
<0> but:
<1> blehhhhh: I'm sorry.
<0> print { $socks[0] } "test 123";
<3> you mean <$socks[0]>
<4> Yeah, the { } bit is a bit special for print statements...
<3> ;)
<4> There it stands for a code block
<1> blehhhhh: No, that's what japhy said.
<0> no, blehhhh. it has to do with Perl's craziness in print()'s definition
<0> perl sees 'print $foo[0]' as 'print $foo [0]'
<0> that is, print [0] to the $foo filehandle
<3> okay but syswrite($socks[0],"test 123") doesnt do anything .. is there a better way to put socks in an array and call it ?
<0> the workaround is to wrap the complex filehandle ($foo[0]) in braces.
<5> GAH! I can write my own web framework faster than installing Catalyst with CPAN!
<1> blehhhhh: what error you got from syswrite($socks[0], "test 123") ?
<0> izut: probably none, unless he's checking for failure ;)
<3> izut: its always > 0 thats the prob
<5> ahem
<0> syswrite($socks[0], "test 123") or warn "syswrite error: $!";
<5> anyone here create rss feeds?
<2> syswrite may return the number of bytes written...
<0> blehhhhh: perhaps you should add a newline to the end of your message? ;)
<6> or it may not ..
<6> kind of depends on your system
<2> okthen, it doesnt
<1> japhy: Heh.
<0> perhaps your socket reader program is waiting for a newline.
<0> that's a common problem.
<5> any special tools i should use? or just read the spec and generate the xml with one of the available perl xml modules?
<1> Unless it ***igned $|
<0> izut: $| has nothing to do with reading
<1> japhy++
<0> $| has only to do with not buffering output
<7> q[ender] what about using one of the available perl rss modules?
<1> Just for print?
<0> yeah.
<5> Ani-_, I guess I could search CPAN or something :)
<0> syswrite() absolutely, positively writes
<1> Well, #perl is like a cl***room :) It's better fail here than at fail at work :D
<7> q[ender] you could? Are you saying you didn't do that before you asked the question? :)
<0> syswrite()'s docs say "it byp***es buffered IO"
<0> I WIN!
<5> Ani-_, hahaha
<0> don't mess with the heavyweight champ. ;)
<1> japhy: :D
<5> hmmm... looks easy enough: http://search.cpan.org/~kellan/XML-RSS-1.05/lib/RSS.pm
<7> Ofcourse it's easy. Everything is easy. :)
<1> blehhhhh: Did it work after put a '\n' at end of your string?
<7> q[ender]: also look at the MANIFEST file... it lists several files in an examples/ directory... ( http://search.cpan.org/~kellan/XML-RSS-1.05/MANIFEST )
<5> Ani-_, hahaha
<5> Ani-_, thanks
<3> izut: well actually yes
<3> izut: but when i use the array of socks the syswrite() doenst return me any errors but still continues without there is something wrong, when i use a single $sock var it works perfectly
<7> blehhhhh, if you don't do any error checking then yes syswrite() doesn't return you errors.
<5> hayzeus chrissed, i should have frickin' timed this
<7> blehhhhh, if there is an error then syswrite returns undef. So store the return value of syswrite somewhere and check if it is defined.
<8> What's the best way to get a random six digit hexadecimal number, i.e. a random HTML color?
<8> It'd need to be in a string.
<5> you don't say
<8> I thought of a for-loop 6 long with rand Int 0-15 and a big switch, but that ain't pretty.
<3> izut: $s = new IO::Select(); $s->add($socksarray[0]) -> is the -add ok ?
<5> Cyde, no need for a switch. use sprintf
<9> $color = join '', map { (0..9, 'a'..'f')[rand 16] } 1..6;
<7> Cyde: @x=(0 .. 9, "A" .. "F");for(0..5){$y.=$x[rand(@x)];}
<8> Thank you Ani-_
<8> That should do it!
<5> Roderick, concise!
<9> $color = sprintf '%06x', int rand 256**3'
<5> Roderick is on a roll!
<9> Now the pressure is on!
<5> although, that's gonna give you a lot of colors without any red and green
<9> Why?
<10> hey Mike
<5> i dunno
<5> i guess not
<11> thrig: morning :)
<5> my intuition told me that the distribution would be different with that method, but that module is probably just broken
<12> Where is CGI::Request module ?
<9> I think if rand() isn't broken it will be evenly distributed.
<12> I couldn't use it after cpan install CGI
<5> right
<1> blehhhhh: Dunno IO::Select() :)
<13> OK! I got the cilantro!
<13> On with the Pico de Gallo.
<0> oregano!
<5> Gimme some hot chili peppers!
<14> japhy: that wasn't oregano. =-)
<0> pico de gato
<0> har har, boogie.
<13> Mouth of the cat?
<13> Ew.
<0> Yaakov: that's what I always confuse "gallo" with. "gato".
<14> boca de gato?
<0> buca di beppo!
<7> Roderick, couldn't you leave out that int? (And you could ofcourse shorten it 2 characters by using 8**8)
<14> haha
<13> Yes, I was translating, sort of.
<9> Yes, I think the int is redundant.
<14> Yaakov: sort of. pico == tip
<13> boogiemon: In this case, "beak".
<13> Cats don't have them.
<13> They have mouths.
<14> Yaakov: ahhh, indeed.
<14> why is that salsa called rooster beak?
<13> It looks like it was "chopped up" by a rooster.
<15> Right, I'm a complete noob with perl, but I'm looking to port an IRC server I coded from VB6 to something better, and someone suggested Perl. What do you guys think to this?
<13> It is the way they eat.
<14> Yaakov: ty. =-)
<16> Hmmm... funny. search.cpan.org displays version 1.04.1 (released today) of Mail-Webmail-Gmail and ftp.funet.fi doesn't have it yet.
<13> s168pin: POE::Component::Server::IRC
<0> Ani-_: shortening 2 characters is nothing
<13> s168pin: So it is redundant, probably.
<16> s168pin: that would be a good idea.
<0> Ani-_: shorten it TO 2 characters!
<0> then I'll give a ****.
<16> s168pin: do you know Perl?
<6> Yaakov: how is your ev1l botnet^W^Wirc monitoring tool anyway?
<17> anyone know a good module that will convert plural phrases to singular? I'm only seeing the opposite.
<0> Uncle_Jesse: you want less of something? what the hell, man?
<14> Uncle_Jesse: look for something that does "stemming"
<13> Botje: I am working on the SNMP crap, which is needed for many things I am doing.
<13> Botje: It is foundational.
<17> boogiemon: excellent. thanks
<13> MUST COOK
<16> s168pin: is it an IRC server or an IRC bot?
<17> japhy: lol
<14> Uncle_Jesse: that might not do exactly what you asked though.
<7> japhy, 2 characters? :( You can't even ***ign a value to a var with that :/
<15> rindolf: IRC server
<6> Yaakov: ZOMG FOUNDAMENTALIST!
<16> s168pin: what is it used for?
<15> rindolf: Well, it's not 100% IRC, I made it use a custom proto for my flash client as well
<0> Ani-_: maybe YOU can't ;)
Return to
#perl
or
Go to some related
logs:
seamonkey ubuntu deb
angstrom n770
#perl
t22 dapper xgl
+how do i copy files +ubuntu
ubouto
sitadelle freevo problem
zend ZDE php popen
compiz apt-get xcompmgr killall
#gimp
|
|