@# Quotes DB     useful, funny, interesting





Google
 
Web www.quotesdb.info
Undernet  |  EFnet  |  Quakenet  |  Freenode  |  Dalnet  |  Ircnet  |  Galaxynet
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



Comments:

<0> eval: 1 | 2
<1> buu: Return: 3
<0> Much better.
<2> anyone know of an interactive way of learning perl? a sourceforge project perhaps?
<3> buu: read this and you will understand what i want, http://opm.blitzed.org/info#using
<0> RIXXON YES THIS IS HOW I KNOW YOU WANT OR
<3> :)
<4> if( -f /dev/loop0) doesnt see /dev/loop0, is this because /dev/loop0 is not a normal file?
<4> what should i use?
<3> i don't understand why i would want or though
<0> eval: $x|=1; $x|=2; $x|=4; $x & 2 ? "yes" : "no";
<1> buu: Return: yes
<0> eval: $x|=1; $x|=2; $x|=4; $x & 4 ? "yes" : "no";
<1> buu: Return: yes
<3> call me retarded but that doesn't help much :>
<0> eval: $x|=1; $x|=2; $x|=4; $x & 8 ? "yes" : "no";



<1> buu: Return: no
<0> Understand now?
<3> heh, no
<5> if the last char of a line is "\n", then chomp should remove that, right? because i know the last char is \n, but chomping the string still sets it to "1"
<6> csb: chomp $string
<3> i just want 20 to return 1 with 3 and 5, and 0 with rest
<6> csb: NOT $string = chomp $string
<0> csb: 1 is the *return* value
<0> rixxon: That made no ****ing sense and has nothing to do with what's on the page.
<3> buu: 3rd and 5th in their table = 4+16 = 20
<0> rixxon: 4 | 16
<0> That's all.
<3> yes but i need that reversed.
<3> i want to extract either 4 and 16 from 20, or 3 and 5
<0> You need to test each digit against the value. I just demonstrated this.
<7> LadyNikon: Kenpo?
<0> eval: 4 | 16;
<1> buu: Return: 20
<0> eval: $x=4|16; $x & 4 ? "yes" : "no";
<1> buu: Return: yes
<0> eval: $x=4|16; $x & 2 ? "yes" : "no";
<1> buu: Return: no
<0> rixxon: Do you understand?
<5> sorry guys don't know what i was thinking. thanks
<8> "tucoz" at 80.202.100.140 pasted "perl dbi question" (8 lines, 226B) at http://sial.org/pbot/15676
<5> buu: thanks. i'm over thinking
<9> when opening a piped procces via open(), how does one kill the proccess?
<9> close() doesn't seem to work, it leaves zombied proccesses
<3> buu: i dont see how that helps me? 20 might aswell be 31 which is all possibilities
<0> ****ING ****
<10> Hi, I am perl-rookie of the year. Do you know what I should do regarding the pasted question?
<0> Jmax: waitpid
<9> buu, thanks
<0> Jmax: Note that zombies are already did
<0> Er, dead
<0> Jmax: Generally $SIG{CHLD}='IGNORE'; is enough
<9> ok
<0> rixxon: TAKE EACH NUMBER YOU WANT TO TEST FOR. & IT AGAINST THE VARIABLE. IF IT RETURNS TRUE, IT EXISTS IN THAT VARIABLE.
<11> tucoz: it'll be in $row[0];
<10> cfedde: ah, thanks :)
<10> I'll try this immediatly.
<10> If my little script works now, I must say I am impressed with perl.
<3> buu:i guess it is zerobased, so 20 & 4 is what i called isbit(200, 3), but why isn't 20 & 5 = 0 then? 3rd and 5th are the only ones who shouldn't be 0, that being 20&4 and 20&6
<3> 200=20*
<0> Mother of god
<0> I've told you exactly how to do it
<0> Why are you still ****ing around with bitfields?
<3> and it doesn't seem to do what i want it to
<0> rixxon: YES IT DOES.
<3> :\
<12> hi.. i was wondering if there was a database that can be viewed through a spreadsheet in openoffice?
<12> so i would use that to store data from my perl script
<0> rixxon: my @x=(1,2,4,8,16); for( 0..$#x ) { if( $y & $x[$_] ) { print "$_ is set!" }
<13> ultraviolet16: you can always store your data as CSV
<7> I'll net CSV would work.
<7> Or, XLS
<7> Hey, Khisanth..
<7> SHUT UP
<3> thanks buu, and sorry for being retarded :(
<13> you'll net?



<0> Hurray!
<13> going fishing?! :P
<11> hook line and sinker.
<12> Khisanth: if i store with csv can I then open that in openoffice with the spreadsheet deal?
<0> YES
<12> sweet.
<12> thanks.
<13> Yaakov: stop abusing Roger
<7> bilge
<14> is this correct enougth?: http://www.goldengay.de.vu/%20ishpisau%20
<14> oops
<14> wrong link dont go there
<14> :))
<14> my %info = (sell=>(1=>0,2=>0),buy=>(1=>0,2=>0),trade=>(1=>0,2=>0));
<14> that's what i mean
<14> i mean i need to be able to do this: $info{sell}->{1}++;
<14> or $info{sell}->{2}++;
<14> so i wonder if i have written correctly
<0> goldengay.de.vu eh?
<13> heh
<13> tesz111: no
<0> my %info = (sell=>(1=>0,2=>0),buy=>(1=>0,2=>0),trade=>(1=>0,2=>0)); $info{sell}->{2}++;
<0> eval: my %info = (sell=>(1=>0,2=>0),buy=>(1=>0,2=>0),trade=>(1=>0,2=>0)); $info{sell}->{2}++;
<1> buu: Return: 0
<0> tesz111: No, parentheses do not construct hash references.
<15> tesz111, don't listen to buu - parens will contruct whatever you can dream up!
<16> eval: for my $i qw(foo bar baz) {$bet_you_didnt_know++}; $bet_you_didnt_know
<1> sili_: Return: 3
<16> kakaakk
<0> That's.. odd
<0> eval:@x=qw/foo bar baz/; for my $i @x {$bet_you_didnt_know++}; $bet_you_didnt_know
<1> buu: Array found where operator expected at (eval 133) line 8, at end of line (Missing operator before ?) Error: syntax error at (eval 133) line 9, near "$i @x "
<0> eval: for my $i qw/foo bar baz/ {$bet_you_didnt_know++}; $bet_you_didnt_know
<1> buu: Return: 3
<0> Oh. Duh.
<14> eval: my %info = {sell=>{1=>0,2=>0},buy=>{1=>0,2=>0},trade=>{1=>0,2=>0}}; $info{sell}->{1}++;
<1> tesz111: Return: 0
<14> eval: my $info = {sell=>{1=>0,2=>0},buy=>{1=>0,2=>0},trade=>{1=>0,2=>0}}; $info->{'sell'}->{'1'}++;
<1> tesz111: Return: 0
<14> fun no more :/
<17> tesz111 what are you trying to do?
<17> get it to return 1?
<14> yeah :/
<18> did anyone ever write some kind of chess server that would be able to give me some tips?
<18> or that tried Chess::Game module
<17> you're using post-decrement so the value is still 0 until the next operation
<17> errr post-increment
<14> oh yeah
<14> got it
<14> ty
<17> try pre-increment
<17> ++$info..
<14> ++$info->...
<19> how can I print $foo while escaping ' and not modifying $foo?
<20> print '\$foo'?
<19> I should know this :-x or maybe I should eat something
<19> no, $foo's value
<20> print $foo;
<19> ' wasn't escaped :(
<20> er... show an example
<20> print "Dead dog count \'$foo'";
<20> oops
<20> print "Dead dog count \'$foo\'";
<20> eval: $foo=10;print "Dead dog count \'$foo\'";
<1> b0nn: Dead dog count '10'Return: 1
<19> the long way would be like $scratch=$foo;$scratch =~ s/'/\\'/; or something
<21> can one turn of threads without re-compiling? say by a command line switch?
<21> s/of/off
<19> ah heckwith it, i'll do it the way i know works *shrug*
<13> New0rder: no
<21> any of you guys works with Win32 and perl?


Name:

Comments:

Please enter the result of the sum 63 + 46 (to avoid spam):






Return to #perl
or
Go to some related logs:

#mysql
#mysql
AHCI vxWorks
#web
kchm deb
kernal panic : Aiee, Killing Interrupt handler !
#lisp
tput setaf grey
#dns
/home/vpopmail/bin/vdelivermail '' catch-all



Home  |  disclaimer  |  contact  |  submit quotes