| |
| |
| |
|
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 28 29 30 31 32
Comments:
<0> % == Mod and something else == rem.
<1> They _should_ be scared
<2> GumbyBRAIN: that hymen needs breaking!
<0> i broke her hymen.
<1> :o
<3> eww
<1> GumbyBRAIN, `K#
<0> duh. Yes.
<2> virgin defiling by megahal
<4> sorry I have been disconnected
<5> BinGOs: Someone is going to tell your wifr about you.
<1> GumbyBRAIN is pretending he can speak Chinese!
<6> GumbyBRAIN: what coffee should i have to boost code performance
<0> Have i got mine today craig.
<5> Brend: The weird part of that is SOME of it was Chinese and some garbage.
<6> GumbyBRAIN: good call
<1> Yaakov, do you have only simplified character fonts?
<5> I don't use UTF-8.
<5> I can't.
<1> Oh. Then some of it was Chinese only by coincidence, and showed the wrong characters
<2> In Soviet Russia, UTF-8 uses YOU!
<7> "phearless" at 81.138.68.106 pasted "print "Username = "; foreach(" (12 lines, 195B) at http://sial.org/pbot/18677
<4> hello !
<5> Yes, but that's an odd chance.
<4> how can I "break" and stop looking for a username if I find a username ?
<1> Yaakov, well, consider what percentage of the character space they take up
<4> cf http://sial.org/pbot/18677
<2> And then someone ruined it by asking a perl question
<4> it must be super super super easy
<5> There were 6 Chinese characters and 0 Roman. I NEVER see Chinese in the garbage.
<6> phearless-: consider your need for the $line variable in your loops
<1> Yaakov, 52 English glyphs, another hundred of so European, about the same Russian, Arabic, Korean, etc ... then fifty thousand Chinese
<5> Yet... there it is.
<1> You type in a random number, you're probably gonna get Chinese!
<6> phearless-: perldoc -f last
<8> phearless-: Type 'perldoc -f last' in your shell or go to http://perldoc.perl.org/functions/last.html
<5> A RANDOM NUMBER
<4> i will check "last"
<5> Nope, all Roman.
<1> Yaakov, -
<9> will my($in,$out) = IO::Socket->socketpair(AF_UNIX, SOCK_STREAM, 0); leave sockets files loitering around the file system?
<5> The first character is a box in the top third wiht a line bissecting i.
<5> t
<5> The line runs nearly to the baseline.
<1> Yeah. "Zhong". Middle
<10> rutski89: if it's anything like C sockets, when the processes die, the sockets die
<5> Was that what you typed?
<1> Yep
<5> Odd. So I get SOME of the characters.
<4> torbjorn: last seems ok for one loop, but I got one loop per username
<1> What encoding do you use?
<5> At this point I don't know.
<5> I have shell/screen/irssi
<11> I'm receiving utf-8
<1> Do IRC messages have BOM prefixes?
<11> Brend: no
<9> p00ya: yea, but when I did it with an explicitly created with IO::Socket::UNIX the file system object that represented the socket remained in the FS even after the socket died
<1> Weird, then
<10> rutski89: oh, if it's a named socket then it will persist
<5> Terminal.app is SLOW with screens full of unicode.
<10> but anonymous sockets won't
<12> hello ?
<1> Yaakov,
<13> E5;;> 2>@;4
<13> e wPd
<12> should I ask my question in russian or chinese to get an answer ? :p
<13> try french :p
<13> so whats the question?
<9> p00ya: but socketpair() doesn't allow me to ever get at the name :(
<12> comment sortir de la boucle si je trouve un username ?
<12> whoever: http://sial.org/pbot/18677
<12> how can I "break" and stop looking for a username if I find a username ?
<13> last works
<3> stop it you, your digging up my unicode fonts
<13> if you want, you can add a name
<9> print $in->hostpath() returns undef
<5> Brown rice with lentils... healthy.
<12> I do not know how to use last for this
<12> last seems ok for one loop, but I got one loop per username
<5> Brend: Nothing readable in that.
<13> phearless: LAST: while (foo) { last LAST; }
<12> I got http://perldoc.perl.org/functions/last.html in front of me
<1> Yaakov, get a decent client.
<5> Brend: I don't have time.
<13> LOOPONE: while (foo) { LOOPTWO: while (bar) { if (baz) { last LOOPONE; } else { last LOOPTWO; } } }
<3> Brend: I could read it
<5> Brend: It appears that an upgraded irssi could do UTF-8 but I would have to patch it.
<5> Wait, I can try something...
<1> Yaakov, how about these:
<3> Brend: baka
<1> simcop2387, pardon?
<3> if he couldn't read the first ones he can't read that
<1> simcop2387, I am testing a theory
<13> phearless: you could add a $exit, too... $exit = 0; while (foo && !$exit) { while (bar && !$exit) { $exit = 1 if (baz); } }
<3> that yaakov is lazy?
<14> sup?
<1> simcop2387, only in part
<12> ok whoever i will try
<14> out of interest
<6> phearless: sorry im at work
<11> whoever: ugly... grew up with Pascal, did you? ;-)
<6> phearless: use last in each loop it's needed...
<12> ok
<6> perhaps nesting your loops?
<13> dakkar: sadly, yes... but i recommended a named last first :p
<12> i will try that stuff
<10> what's the perldoc page/section where prototype syntax is described?
<11> perlsub?
<2> Brend: can you try some of those funky chars again ?
<11> confirm, perlsub, section 'Prototypes'
<1> BinGOs, which ones?
<2> anything to test utf-8 really
<5> Oh well.
<13> lol, i just found the redo function
<1> BinGOs, `=P
<5>
<13> i work with perl since years and didn't know a "redo" exists
<5> oops
<15> hi
<1> Also, SCIM ****s a huge bunch of ***
<16> Redo isnt a function, its a key word. Or am i wrong? :)
<1> Windows' chinese input system is light years better
<5> NO!!
<1> YES
<5> IT'S WINDOWS IT HAS TO BE BAAAAAD
<13> eval: { print "foo\n"; redo; }
<15> i am learning perl now and i want to make some practice programming on arrays and hashes where can i find these practice programming in perl
<1> For a start SCIM pretends not to support pinyin for traditional characters, but actually does
<8> Killing 527 due to run time
<15> can any body tell me please
<1> But it doesn't know compounds, so you have to choose every character by hand
<17> /([\d+|-])/ <--- is that a regular expression to say "any number of digits OR a hyphen (-)"?
<1> And it doesn't know tones, so you have to choose from a huge list
<18> perlbot beginning perl
<19> http://learn.perl.org/library/beginning_perl/
<13> lol, with redo you can do loops without do,while,for,etc ... :p
<18> rkr245: read the chapters on arrays and hashes there
<9> is there a perl function for pwd()?
<1> And you have to push a button when you select the character you want, instead of just carrying on
<1> And it ranks characters by how often you use them, so the numbers keep changing!
<18> rutski89: the Cwd module provides that
<15> Botje,o.k
<9> ah, ok; ty
<1> It's impossible to get more than like 10 characters a minute
<1> On Windows I can do 50
<9> oh, $ENV{PWD} does the trick too :)
<1> whoever, it has goto too, y'know
<1> But not comefrom, sadly
<20> given an integer i need to find the number of '1's in the binary equivalent of it?and also its position..how do i do this?
Return to
#perl
or
Go to some related
logs:
#kde
+rename examples +DOS
ranlib: unable to rename
vino refresh ubuntu
+glx +i950
Clean reverse dns
#lisp
firestarter on drapper
#web
#oe
|
|