@# 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 29 30 31 32 33 34 35 36 37



Comments:

<0> that's just about as hard
<0> and a helluva lot easier on the system.
<1> eval: ref qr/foo/
<2> yea, i'm reading the perldoc on it now
<3> cfedde: Regexp
<1> that behavior is not documented in perlfunc?
<4> rutski89, do you want to grab a webpage from "toshiba"?
<2> Chris62vw: nope, just flood it with more data it can process or fill up the logs
<4> use LWP::Simple; my $file = get "http://toshiba";; should be that easy
<5> use Socket; socket(my $fh, AF_INET, SOCK_STREAM, scalar getprotobyname('tcp')) && connect($fh, scalar gethostbyname('toshiba'));
<2> Chris62vw: i know
<6> How many people here use the timed bake on their ovens alot?
<2> simcop2387: you mean the timer?
<2> simcop2387: that shuts the oven off after X minutes are up?
<7> simcop2387: I use the clean feature when I don't feel like cleaning the turkey myself.
<4> simcop2387, I haven't ever used my oven



<8> how do I strip a prefix from a number? for example, I have a hexdec number that begins 0x, 0X, x or X...how do i strip that bit off and just leave the number?
<9> pearl ****s.
<6> rutski89: that'd be it
<9> Chris, you're a baking noob? :[
<4> s/^0?[xX]?//
<4> Daveman, no. I'm just rich enough to dine fine every night, outside my home
<9> simcop, never
<10> s/(.*)[^\d]//
<4> oh god no
<9> Chris, loser.
<2> simcop2387: yes, I love that feature :-) I'd burn pretty much everything that goes in there if it didn't shut itself off. I'm very absentminded.
<4> first, no anchor. second, .* is just horrid
<10> Awww.
<10> I forgot ^.
<4> and we have \D !!! :-)
<10> Oops.
<9> :p
<4> mine is far superior </smug>
<9> heehee, riczho :)
<8> riczho: that won't work, as a hexdec number is not \d
<6> rutski89: same here, i use it for everything i can
<4> eval: $_ = "0x123"; s/^0?[xX]?//; $_
<3> Chris62vw: 123
<4> $$$$$$$$$$$$$$$$$
<2> simcop2387::D
<2> simcop2387: i mean, :D
<9> :D
<11> mangle: superior manhood solution
<3> top dog majority expounding
<11> mangle: superior manhood solution
<3> doyenne doughtiness light
<8> Chris62vw: $_=~s/^0?[Xx]//;
<11> mangle: superior manhood solution
<3> hoity-toity adulthood fusing
<4> StevenR, use my regex. you forgot a piece
<4> if the X is always going to be there, I guess your version is fine
<12> go go gadget jew!
<8> Chris62vw: the x defines it as hex
<7> Is there a list of GumbyBRAIN's best quotes somewhere? I just need about 3.
<4> StevenR, right :-)
<4> dabreegster, let's make some
<8> Chris62vw: I'm writing a simple programmer's cheat calculator...feed it a number, it decides what sort it is, and prints the 4 possible based numbers.
<7> GumbyBRAIN: You're a monster in my roguelike!
<13> In all the humps. You'll see its a monster.
<4> StevenR, oh. well there's already a perldoc on that... gee, what's it called...
<11> mangle: love shack
<3> inamorato tollhouse
<11> mangle: love shack
<3> inclination outbuilding
<11> mangle: love shack
<3> **** caboose
<7> Good one. GumbyBRAIN, I need 2 more quotes so I can have you randomly say them. Then my demo will be ready to play!
<11> O.o
<8> Chris62vw: not a cheat sheet, just a calculator
<4> StevenR, read perldoc -q "is a number"
<11> O.o
<11> mangle: love shack
<3> desiderate cot
<11> mangle: love shack
<3> derive pleasure from bum



<4> you will be pleasantly surprised with the regexes. maybe
<11> OK, this is... hrm.
<9> o.O
<8> Chris62vw: http://rafb.net/paste/results/xETNhj46.html it's work in progress, but it's shaping up ok
<3> The paste xETNhj46 has been copied to http://erxz.com/pb/2058
<4> StevenR, cool so far
<8> Chris62vw: I if it's not a number, then it's a string and it aborts. it's not going to extract numbers, simply sulk if it's not a number :)
<0> has anyone dealt with hashes with a million keys?
<0> s/anyone/$& here/
<8> Chris62vw: term ansicolor will make it pretty, eventually :)
<12> once or twice
<14> I think I may have made a few.
<7> GumbyBRAIN: Do you have enough memory to deal with a million keys?
<13> No big deal to say i have.
<11> mangle: love shack
<11> buu: buubot has... ceased.
<15> is there anyway to have a perl var with a variable name? a la php?
<11> eval: 1
<0> Just trying to answer $client's question about the O(n-mumble) questions
<0> sparkman - yes but you don't want to do that
<0> you want to use references instead
<15> i know i don't
<15> heh.
<15> perldoc perlref? i take it?
<9> one meeeeeeeeeeeeeeeeeeeelleon dollars
<8> Chris62vw: I wanted to do the last if($base..blah with unless, but I couldn't make it work :(
<11> USE A HASH SON
<9> merlyn, yes
<9> it breaks
<9> and is reaaaaaaaaaaally slow
<16> MY HASH CAN BEAT UP YOUR HASH
<9> can be, anyway
<9> I got ten bucks on Botje
<9> :)
<8> Botje: but would your hash p*** a drug screen afterwards?
<3> be pleased with hovel
<3> Type 'perldoc perlref' in your shell or go to http://perldoc.perl.org/perlref.html
<3> Yaakov: 1
<11> Yay!
<11> mangle: love shack
<3> potency traveler
<11> mangle: love shack
<10> mangle: The Declaration of Independence
<8> riczho: you've broken it!
<10> Oh suuuuure, blame the last user!
<11> It's totally lagified.
<3> peaceableness hut
<3> The proclamation of free will
<14> merlyn: Only big catch with big hashes, beyond running out of memory, etc. is that you can do much better if you hint the size of the hash in advance (keys(%hash) = N) to avoid reallocations.
<7> Yes! My project is finally ready!
<0> ahh ok
<0> thanks
<10> "The proclamation of free will" ?!?! what a ripoff!
<2> merlyn: if I did perl -MIO::Socket::INET -le 'while(1) { my $s = IO::Socket::INET->new("yourserver:80"); $s->print("a"); }' from multiple computers... would that kill one of your openbsd servers?
<2> merlyn: I'm curious about what I should do to prevent a DOS like that.
<17> Dispatch IT Ninjas.
<2> it m***ively fills up the logs and causes the cpu usage go go up by ~30%
<2> DrForr_: hehe
<17> Not if I blackhole your IP at the router.
<17> And *then* dispatch the ninja.
<2> DrForr_: what if it's already too late when you notice?
<2> hehe
<11> rutski89: It is never too late for revenge.
<17> It's the ninja's problem. No blood on *my* hands.
<6> GumbyBRAIN: Hawaii Five-O
<13> O/~ 200 boomers, butt naked boomers o/o.
<2> Yaakov: lol, yea
<6> what is a boomer?
<11> It might be Aussie slang for a roo,.
<11> roo.
<7> simcop2387: I'm finished with 1.0 of my game! I'm gonna release it to the newsgroup once I can get some people to playtest it.
<18> old people


Name:

Comments:

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






Return to #perl
or
Go to some related logs:

niggercum
gnash fc5 x64
#lisp
#php
#python
gentoo epiphany sandbox access violation
pilot-mailsync binary
windows Symbolics keymap
date_default_timezone_set safe mode
#perl



Home  |  disclaimer  |  contact  |  submit quotes