@# 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



Comments:

<0> japhy
<0> :)
<1> the LWP::UserAgent page describes how
<1> "redirectable requests" or something
<2> hey lunar
<3> is there htonl in standard lib?
<2> sorry I haven't responded at all to your /msg
<2> I've not been on IRC much lately, and I've been doing very little personal perl work
<2> my Job (tm) has kept me busy
<4> JAPHY!
<5> changed the call as recommended... actually will change the dump to just $sorbs->{'userInfo'} as that is the problem part .. should help because I can also dump it in the checkSuperRole routine (though I think the results are going to be predicable)
<0> japhy I feel your pain.
<4> My ISP ****s absolutely.
<4> I get an abysimal download speed.
<0> I have lots of personal projects and ideas that I'd like to follow but when I get off the clock im not much in the mood



<6> llm0: it _IS_ in core perl. look at pack/unpack.
<3> o_o
<7> Botje: looks like you scrambled llm0's brain
<3> pack is a monster in perl in my opinion
<6> llm0: but it does what you want. deal with it.
<6> $network = pack "N", unpack "L", $host
<6> probably.
<8> HALLO
<6> HALLO EVAN
<8> ANOTHER GOOD DAY TO BE ME.
<6> DID YOU KNOCK OVER A DONG STORE?
<8> and, another good day to not be you.
<8> Botje: yes i knoced over a dong store, with my dong.
<5> now we're getting somewhere... http://rafb.net/paste/results/seUDP454.html
<9> The paste seUDP454 has been copied to http://erxz.com/pb/3202
<7> Matthew: and the error seems to tell you exactly what you are missing
<10> "Matthew" at 203.173.10.61 pasted "more odd stuff... log here: http://rafb.net/paste/results/seUDP454.html"; (17 lines, 750B) at http://sial.org/pbot/19633
<9> The paste seUDP454 has been copied to: http://erxz.com/pb/3202
<7> Matthew: so why AREN'T you providing the other params?
<5> because the params are actually in $sorbs->{'userInfo'} (or are supposed to be) ...
<5> the 'params' message is arbitry
<5> it's telling us that there is a userInfo has but id, email and login are not defined in it - at least one is required
<11> I'm looking for a module that will allow me to screen cap a website and save it as a .gif/.jpg, any ideas?
<1> sniperd - as rendered on what browser?
<1> and using what fonts
<1> and at what width?
<5> the proble is the to lines in the error that refer to line 184 and 441 - it's telling me that there are 2 values for $sorbs
<1> HTML does not define precise view
<1> in fact, it's good that it doesn't
<11> i'd say rendered as IE if possible. this will be running from a windows box.
<1> eww. double yuck.
<1> IE *and* Windows
<11> but i'd be happy with FF or NN, it's just to make thumbnails
<1> there's something called "html2ps" out there
<1> you can probably fire that off from Perl
<11> hm!
<1> probably even an installable package for your machine
<11> interesting...
<11> i'll give this a shot, it might just do the trick
<5> http://erxz.com/pb/3202?ln=on&submit=Format+it%21 lines 3 and 45 indicate $sorbs is different
<5> erm 2 and 45 even
<5> so any ideas why the base of $sorbs changes between 3 lines of code?
<6> how can we tell from simple output?
<12> Matthew: you changed it.
<6> comment out lines of code until you find the one that breaks it
<6> and most of all: work incrementally
<6> verify at each step $sorbs is not modified, and then, only then uncomment the next block of code
<5> well there really are only 2 lines between...
<5> warn "\$sorbs->{'userInfo'}: " . $sorbs->{'userInfo'} . "->" . Dumper($sorbs->{'userInfo'});
<5> $result = $sub->();
<6> $sub->() ?
<6> but that calls $sub with an empty argument list
<6> you'd want to at _LEAST_ p*** on $sorbs
<5> $sub is adminRole
<6> how does that matter?
<13> random question: does the name of MySQL have anything to do with the common DBI idiom my $sql = <<'END_SQL' ?
<12> cjeris: no
<6> does sub adminRole start with my $sorbs = shift ?
<6> if so, you need to p*** the object



<6> either $sorbs->$sub() or $sub->($sorbs)
<5> no, but does it need to? $sorbs and $sub->() are in main
<6> YES. IT. DOES.
<6> lexical scoping and all that.
<5> I replaced &$sub with $sub->() after someone said it... :-/
<5> argh! :-(
<6> dynamic scoping is generally viewed as _VERY_ hard to debug.
<6> so p*** your object along like a good little boy
<6> which, incidentally, how perl's object system works
<5> $sorbs->$sub() wouldn't work though adminRole is a sub in umanager.pl not SORBS.pm .. or am I not understanding the whole concept?
<6> inded it wouldn't.
<6> but $sub->$sorbs() would
<6> ehm
<6> $sub->($sorbs)
<5> yup
<6> trace the execution of your program, and rewrite any place where you implicitly use $sorbs to properly receive it as an argument
<7> what the hell, a single var to hold everything AND it's global?
<5> ok and that fixed it .. :/ bleh!
<12> Khisanth: well, it has to be global. It holds *everything* ;)
<4> Hi PerlJam
<14> hi guys
<5> global to that thread/execution path
<7> PerlJam: not really!
<12> hey rindolf.
<4> PerlJam: what's up?
<4> PerlJam: I'm catching up with my JoS.
<14> I use this code --> $a =~ m!/aaa/(.*?)/!; return $1;
<14> is any way to do it in one string ?
<14> like return a =~ m!/aaa/(.*?)/!; (it doesn't work)
<6> Sir_J: it works. but only in list context.
<14> Botje, I see
<5> Botje: thank you.. now the obvious question is why did it not work before and works explicitly p***ing $sorbs ...?
<6> return ($a =~ m!/aaa/(.*?)/!)[0]
<12> Sir_J: Why do you care to change something that works?
<6> Matthew: probably because somewhere along the lines, your code used $sorbs when it _WASN'T_ defined
<14> PerlJam, beauty
<6> Matthew: and perl then "helpfully" autovivified its own hashref.
<12> Sir_J: I think you mean "foolishness"
<6> that's why the address was changing
<7> so what you are trying to say is you like midgets?
<14> Botje, cool, thanks
<5> so it just chose the hashref at random between the 3 lines?
<15> yes, perl is very random and has it's own behavior.
<12> Matthew: no, it "chose" the one that was auto-created by using the lexical as a hashref.
<12> Matthew: are you not running with "use warnings; use strict;" in your program?
<7> programs are rarely random, unless overwrite memory then it might be :)
<7> that you aren't supposed to
<16> uhm... you're always in random-mode Khisanth, that's your normal behavior :P
<15> sometimes they're at least a little random when you use rand(), but even then it's often dissappointing
<7> although I doubt anyone will notice in your case!
<10> "jeeger" at 84.171.145.213 pasted "Strange sub/regex problem." (17 lines, 381B) at http://sial.org/pbot/19635
<5> top part of that script: http://rafb.net/paste/results/rKpCsW44.html
<9> The paste rKpCsW44 has been copied to http://erxz.com/pb/3204
<17> hey i have a problem. see link...
<5> (debug is on so warnings are on)
<6> Matthew: step the first: put all your use statements at the top
<17> I have a regex which captures $1 and $2. I then set $result[0] and $result[1] to $1 and $2 respectively. However, this does not work... @result is empty...
<15> jeeger: @result = ($foo =~ /$bar/)
<6> jeeger: that is really _REALLY_ bad form.
<17> @Botje Enlighten me please
<15> well if you do anything that touches a regex before you try to set them, say goodbye to your captured variables
<5> Botje: yeah, they migrated over time (and I really don't know why - even though I am the culpret)
<15> not to say that's the only reason not to do it, but one.
<6> jeeger: i'd rewrite that as sub extract_type_type { my $str = shift; if (@result = $str =~ m!(.*?) (\d\d:\d\d:\d\d:, \d\d/\d\d/\d\d)!) { return @result; } else { warn "uh oh!" } }
<6> my @result = ... , even
<16> ENOBOTJE
<6> EHLO AMNESIAC
<6> Matthew: that DOCUMENT_ROOT check is useless too, since _BOTH_ use lib statements will be executed
<5> heh - now that I *know* is not my code ... and the person who did it, is 'supposed' to know better ;-)
<6> Matthew: also, people generally use $config->{debuginfo}


Name:

Comments:

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






Return to #perl
or
Go to some related logs:

the following packages have unresolvable dependencies
ubuntu dns setting bug
#perl
#web
+ failed to load module pcidata
#centos
lambdamoo rivermoo
#sql
automatrix mephis
fckeditor interal server error 500



Home  |  disclaimer  |  contact  |  submit quotes