| |
| |
| |
|
Page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
Comments:
<0> m
<1> Plus it's a great bonus if you do admin work and automation
<0> so is ti better to learn tcp ip networking and be network guy?
<2> shouldn @a=[1,2,3]; foreach $x (@a) { print "$x\n"; } wri
<0> god I dont use my damn ucla econ degree ata all
<3> shemale_magic: learn COBOL
<2> shouldn't @a=[1,2,3]; foreach $x (@a) { print "$x\n"; } write 1,2,3?
<0> clisp i heard is awesome
<0> cobol?
<0> lol
<4> jaaroo: @a=(1,2,3);
<3> jaaroo: no, it should not
<5> jaaroo: no
<5> jaaroo: @a is an array of one element, containing an array reference. You want parentheses, not brackets.
<2> oh, i get it now...
<1> shemale - how much you get paid is more a function of where you work, rather than what you do, at least in the beginning.
<2> \me thinks about difference between python and perl ;o)
<3> jaaroo: Arrays an Hashes in Perl can only contain scalars, not other arrays and hashes
<3> jaaroo: write that down;)
<6> eval: $a = [1,2,3]; foreach $x (@$a) { print "$x; "; }
<7> mauke: 1; 2; 3; Return:
<5> (but that's okay because references are scalars)
<3> eval: 1
<7> avar: Return: 1
<3> eval: @a = [1..3]; for my $i (@{$a[0]}) {print "$i; "} undef
<7> avar: 1; 2; 3; Return:
<8> GumbyBRAIN: what?
<9> simcop2387: Hrmm... Fluxbox doesn't do what you want.
<3> eval: @a = [1..3]; for my $i ($a[0]->[1..3]) {print "$i; "} undef
<7> avar: 1; Return:
<3> fleh;)
<6> you can't slice with ->
<10> eval: @a = [1..7]; for my $i (@{$a[0]}[1..3]) {print "$i; "} 1
<7> encryptio: 2; 3; 4; Return: 1
<11> how do i flush a filehandle ?
<5> pull down on the lever
<12> Hrm.
<6> my $ofh = select $fh; my $op = $|; $| = 1; print $fh ''; $| = $op; $select $ofh;
<5> yeah, that.
<3> {local $| = 1 ...
<6> does that work?
<3> eval: {local $| = 5} $|
<7> avar: Return: 1
<6> eval: $|
<7> mauke: Return: 1
<3> eval: {local $| = 5; print $|} $|
<7> avar: 1Return: 1
<12> Hrm
<12> REDO => COP (0x81690c8) nextstate
<12> NEXT => OP (0x8153168) unstack
<10> eval: {local $| = 0; print $|} $|
<7> encryptio: 0Return: 1
<6> eval: $\="; "; $fh = select; { local $| = 0; print $fh; print select() }
<7> mauke: main::STDOUT; main::STDOUT; Return: ; 1; ;
<6> you win this round
<3> there was a competition?;)
<11> wth *_*
<11> there no easy way as flush($fh) ?
<6> use IO::Handle; $fh->flush;
<10> or you could set autoflush on your handles anyway.
<12> hrm
<12> eval: $^i
<7> buu: Bareword found where operator expected at (eval 111) line 1, near "$^i" (Missing operator before i?) Error: syntax error at (eval 111) line 2, near "$^i "
<12> Oh. ****ing perl.
<12> Wait, wtf?
<12> eval: $^N
<7> buu: Return: $^N
<10> o.O
<12> Oh
<12> That one made sense.
<13> I've written a DB connection cl*** which returns a DBI handle when its constructor is called... it's acting really strangely, though. When called by some scripts, the returned handle is of the right cl***, but sometimes it's DBIx::ContextualFetch... I can't figure out what'
<12> eval: $^I
<7> buu: Return:
<12> Now that is interesting
<12> furious_: Um. What?
<13> what's making this happen... what should I check out?
<13> my cl***... AW::DBI... when I do a my $dbh = new AW::DBI; some scripts get a handle that's of cl*** AW::DBI, and some get DBIx::ContextualFetch
<13> it's really strange
<10> ...do you return your blessed reference?
<12> furious_: We're going to have to see some code.
<3> use Holy::Water
<14> "furious_" at 208.54.95.129 pasted "my constructor" (25 lines, 561B) at http://sial.org/pbot/16765
<12> Preferably code that demonstrates the problem.
<3> sub new { bless {} }
<12> furious_: (Congratulations, you're reinvented connect_cached!)
<12> s/re/ve/
<13> sweet!
<12> One could ask why, but I'm fairly certain I don't want to know
<12> I will say merely that I wouldn't attempt to sub cl*** DBI
<13> so I can toss the %dbh hash, then, and replace connect with connect_cached... how come sometimes my returned handle is of my cl***, and sometimes of cl*** DBIx::ContextualFetch
<13> ?
<13> it's worked fine for a while now... it's only since I added this %dbh hash that I've had the problem
<12> furious_: Because I suspect DBI plays poorly with sub cl***ing.
<15> I notice that the returned object from connect() isn't actually being blessed anywhere in that constructor.
<13> ahh, hmm! well, crap.
<13> Ciaran: this is true.
<12> Ciaran_H: In theory it shouldn't be.
<2> what about nondestructive splices? e.g. copying out some elements from an array.
<12> jaaroo: They're generally not needed, but what about them?
<10> jaaroo: you mean an array slice?
<4> jaaroo: use @array[5..10]
<13> well, I do have one problem that requires me to subcl*** DBI
<15> buu: Okay. I'm not certain what's happening here, but that's probably because I'm only halfheartedly looking at it. It's just something I thought I'd throw out.
<2> buu: i need to get some portion of an array without actualy removing elements from it which is what splice does.
<12> jaaroo: No it doesn't
<2> buu: @a=(1,2,3,4);splice(@a,2,1); @a == (1,2,4)
<12> Ciaran_H: In theory when you're subcl***ing a constructor you merely call $cl***->SUPER::new(); and it will bless the object in to the right cl***.
<13> this cl*** is meant to replace a hideous DBI wrapper that existed before I started at this place... and there's a method which that thing uses which a ton of code expects to exist
<12> Ciaran_H: However some modules do that.
<12> Er, do not.
<10> eval: @a = 1..10; @b = splice @a, 3, 2; \(@a,@b)
<7> encryptio: Return: $VAR1 = [4,5];
<10> eval: @a = 1..10; @b = splice @a, 3, 2; [\@a,\@b]
<7> encryptio: Return: $VAR1 = [[1,2,3,6,7,8,9,10],[4,5]];
<13> so I'm kind of stuck extending DBI for the moment :/
<12> jaaroo: Hrm. You seem to be correct, I was under the impression it worked like substr.
<12> jaaroo: Anyway, see slices.
<2> buu: where?
<10> @array[4..6]
<2> encryptio: thanks
<6> jaaroo> Is there any standardised way how I can create slices out of arrays? < avar> @arr[slice] < encryptio> jaaroo: you mean an array slice? < buu> jaaroo: Anyway, see slices.
<10> buu: to make the evalbot a little nicer (not show that ugly "$VAR1 = ") - $Data::Dumper::Terse = 1;
<12> Hrmph. I'm going to beat Configure every time it asks me a question I already answered.
<3> Half-naked girlfight turns into lesbian *** scene, what a twist!
<16> ZOMG U WATCH PR0N?!!!!11!1!1 keke ^^ roflwaffle
<3> Botje: Just for the plots
<12> avar: Those are the best parts.
<16> ah, of course
<3> buu: sure are
<12> avar: Pirates
<3> That dude is pretty good
<3> I wonder why most of them end with the dude jerking off
<16> yar!
<3> If I wanted to see dudes jerking off I'd get a mirror
<16> not enough ***?
<12> avar: I've wondered that one occasionally
<12> avar: I suppose the logical conclusion is that the female talent can not stimulate them to orgasm
<12> Or something
<12> Or maybe it's just hard to get facials.
<13> ok, this is an act of desperation... I'm sitting here in an airport terminal trying to debug this goddamned thing before I go somewhere where the internet ain't... so it only has to work for a few days til I get back, no matter how horrible it is. in my constructor, I'm now checking to see if I've got a DBIx::ContextualFetch handle and then re-blessing it into my cl***... is this a horrible thing to do?
<3> They usually all follow the same plot
<17> furious_: if it doesn't matter whether or not it is horrible why ask? :)
<10> furious_: you shouldn't have to do that... but if it works...
<3> Some dude that just happens to have a 9 inch cock walks into this woman's office/home/whatever
<3> She trips and all her cloathes fall off
<13> well, I know it's horrible, I'm just wondering if I'll blow more things up by doing it :)
Return to
#perl
or
Go to some related
logs:
center my page css
amavis sa-debug
ignasoft
ttyUSB0 sarge dchroot
vmware use /dev/snd
basbryan
#lgp
#python
set failed on device wifi0: invalid argument
#css
|
|