| |
| |
| |
|
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
Comments:
<0> one man's bug is another man's feature.
<1> how is that a feature?
<2> shup
<0> perintf $format, @_;
<1> that's ok
<0> printf even
<0> so one argument "printf" should be a bug.
<0> I'll buy that.
<3> Hey guys, I am having a crazy networking issue. For every outbound connection I attempt, I get "Resource Temporarily unavilable" Wether it be a ping or dns request. It appears to only happen once per destination, a second later I connect just fine.
<3> I have tried two different switches, 3 different cable and two different built-in ethernet ports on this box. I have no idea what to check next
<3> doing an strace shows that connect is failing w/ Resource temporarily unavailable and of why I have no clue!
<3> the only thing that has changed is I recently did an aptitude dist-upgrade
<4> signuts: this is probably the wrong place to be asking... however, do all these request require a DNS lookup?
<3> SpoonMeiser, I know, I ***umed so as well but the only variable here being my dist-upgrade makes me wonder.
<3> SpoonMeiser, the requests are all IP based
<3> SpoonMeiser, shoot. I thought I was in debian. stupid laggy network
<5> someone wants a 256-char URL in CLPM. That's more state than countable atoms in the universe. :)
<5> I mean, I understand "secure" and "distinct sessions"
<5> I just don't get 256**62 values. :)
<6> Hi I have a perl app. there are two files. file one uses 'require' to use the code in file two. I need to reference the same 'global' hash in both files. how do I do that?
<5> nrdb - you should try not to do that
<5> learn how to make a proper module
<5> see perldoc perlmod
<7> Type 'perldoc perlmod' in your shell or go to http://perldoc.perl.org/perlmod.html
<8> signuts: that corresponds to EAGAIN. check "man 2 connect" and read the part about EAGAIN.
<5> and read "Intermediate Perl"
<9> my $x = deflateInit() or die "this text has been deflated/inflated"; # wtf?
<10> merlyn!
<3> infi, awesome. i'll tinker. 65535 is the max port # correct?
<5> & enroute to the airport, but to pick up OTHER people amazing
<4> right, I'm outta here - later folk!
<6> signuts: yes 65535 is max shouldn't use low number <1024 they can be ***igned to things like browsers etc.
<9> heh
<11> wtf, I left?
<3> nrdb, I can't imagine running outta connections. this is crazy
<6> signuts: what is crazy?
<8> signuts: er, <1024 are not ***igned to "things like browsers, etc", they are the "well-known" ports and require superuser priveleges (on unix, anyway) to bind to, making for an early and poor attempt at security.
<8> signuts: netstat will show you current active tcp connections, so you can see what might be stealing your ports.
<6> infi: yep I know, browsers are port 80 and 443 so my statement was correct, even if it didn't use all the offical terms.
<9> nrdb: those aren't "browsers". Browsers use high ports and don't bind any ;)
<12> hi i'm reading words from a list, seperated by whitespace and I want to print them ordered with numbers before the words so I used:
<12> perl -ane '$count = 1; END { map { print $count++," $_",$/ } @OUTPUT; } push(@OUTPUT, @F);' wordlist.ssv
<8> browsers are not port 80 and 443. HTTP is port 80, and HTTP over SSL is port 443, and those are generally bound by webservers, not browsers.
<6> infi: ok my mistake.
<9> smg: using 'map' on the result of 'push' can't be good...
<13> another quick question... i want to use $#array to find the number of elements in an array for use with int rand().... so im trying to drop that into $count. what im having trouble figuring out is the correct syntax for $#. this is what it looks like so far : $count = $#($testtypes[$test_type][1]); $testtypes is an array while $test_type references which array in $testtypes to use...
<13> now that i look at that... that question isn't so quick
<9> josh_: you don't want $#
<13> :P
<9> josh_: you want @array ;)
<11> josh_: don't invent syntax kthx.
<13> kthx?
<12> hobbs: can you recommend something?
<9> smg: the whole thing seems fairly pointless. printing $/ has also got to be wrong ;)
<12> mh \n instead eh
<11> smg: perl -nle 'print $a++," ", $_ for split' wordlist
<13> i haven't used the @array method before... could you give me a short example in context to an array in another array?
<11> josh_: perldoc perlreftut.
<9> Botje: beat me to it
<14> using print on map is weird :-)
<9> josh_: whatty mcwhatwhat?
<11> counting array sizes works just the same as with normal arrays
<12> Botje: wow!
<11> use the array itself ( which you will have to dereference ) in scalar context
<15> Botjes :)
<11> davepeople :P
<12> Botje: this one was really cool
<11> *shrug* I guess it is :P
<9> smg: you want BEGIN { $a = 1 } in there somewhere most likely
<12> hobbs: Botje did the job :)
<11> hobbs: or you just do ++$a :)
<9> smg: no
<9> Botje: or that, but I like being explicit :)
<11> pffrt
<9> smg: you get an initial "" for $a ;)
<15> :P
<11> explicitness is useless for oneliners!
<12> hehe yeah
<11> smg: perl -nle 'print ++$a," ",$_ for split' wordlist
<12> but on which does split operate?
<11> fixed :P
<12> Botje: that split which array does it use?
<15> \o/
<11> smg: it doesn't.
<13> so according to that i could say : int rand($testtypes[$test_type][1]; and it would return the number of elements in the subarray of $testypes minus 1?
<12> Botje: on what does it split?
<11> split operates on $_ by default, and splits by whitespace, also by default
<12> okay nice to know
<12> thank you very much
<11> josh_: what?
<9> josh_: 1) that sentence didn't really make any sense 2) there's nothing starting with @ in there at all
<11> josh_: you probably just want int rand @{$testtypes[$test_type]}
<11> josh_: read perldoc perlreftut
<7> josh_: Type 'perldoc perlreftut' in your shell or go to http://perldoc.perl.org/perlreftut.html
<11> << off, food
<11> and film!
<12> :P
<11> sub array_rand(\@) { my $a = shift; return $a->[int rand @$a] } # look! a use for prototypes!
<11> << p00f
<15> :o
<15> magic!
<12> really :)
<13> :@testtypes = (['A','@days'],['B','@colors']); $count = int rand @{testtypes[$test_type][1]};?
<1> ouch, no
<1> use warnings; use strict;
<9> josh_: no, the first half of that is also entirely broken ;)
<13> ($test_type is going to be the user input specifying a,b,c so on to call the right array
<12> hehe
<16> sigh.
<13> the first half is broken?
<9> josh_: okay in that case your data structure is wrong in TWO different ways
<13> how so? seems to work fine on my end with strict and warnings not complaining
<9> josh_: the first being that you would want a hash for that kind of lookup, not an array; the second being that you store a _reference_ the array you want, not its name
<13> oh sorry about that "@days" and "@colors"
<13> got ahead of myself up there
<17> hey ya'll
<17> now after some hours... i finally got dbd::Informix up and running but
<17> the informix connector always uses one specific value though $INFORMIXSERVER isn't even set.. does anyone know where there might be another "default" source ?
<18> in image magic for perl, do i have to call some execute parameter so the picture actually gets modified ?
<19> So I have an interesting need. I have logging function that I call all over the place in my program. For now I have been use __LINE__ before the log message to get the line number of where I am generating my logs. I would like to stop doing this and include this in the subroutine I wrote instead of prefixing each message with __LINE__. I am calling this similar to logthing::log($loglevel, "Line: " . __LINE__ . " Message here."); Is there
<1> cut off at "; Is there"
<20> PepperBob: I'd thought $INFORMIXSERVER had to be set. Perhaps the first sqlhosts entry is the default.
<9> Kylixen: perldoc -f caller
<7> Kylixen: Type 'perldoc -f caller' in your shell or go to http://perldoc.perl.org/functions/caller.html
<19> jesus christ. twice in a one day. Thanks hobbs.
<9> Kylixen: no prob
<9> Kylixen: I'm only ***uming that I guessed the rest of your sentence though. If I was way off the mark let me know ;)
<17> Roderick, I had $INFORMIXSERVER set. But while experimenting I unset it. Though it uses one specific dbserver. Even when I p*** something like: dbi->connect('dbi:Informix:db2@server2') it won't accept server2... this is too strange...
<19> .. "Is there a way I can grab the calling line in the logthing::log function?"
<17> Roderick, it will always use whatever it was in $INFORMIXSERVER - which I defined when setting up DBI::Informix.. might there be another place for defaults?
<20> Well, I've always used the $INFORMIXSERVER from the environment and a straight dbi:Informix:dbname.
<19> eval: print caller
<7> Kylixen: P5EvalBoteval.pm83 1
<19> eval: print caller(-1)
<7> Kylixen: 1
<19> eval: print caller(-2)
<7> Kylixen: 1
<19> eval: print caller(2)
<7> Kylixen: P5EvalBoteval.pm126P5EvalBot::safe_execute12 1
<20> Again, perhaps the first entry in the sqlhosts file is the defalt.
<19> ooo
<20> Oh, you're saying it uses the $INFORMIXSERVER which was there when you first opened a database, and you want to change it?
<9> eval: while (1) { @crap = caller($n); $n++; last unless @crap; push @morecrap, [@crap] } \@morecrap
<7> hobbs: [['P5EvalBot','eval.pm',83,'(eval)',0,0,'no strict; package main;BEGIN{ *CORE::GLOBAL::msgctl = sub {die}; *CORE::GLOBAL::msgget = sub {die}; *CORE::GLOBAL::msgrcv = sub {die}; *CORE::GLOBAL::
<9> hmm... that's interesting
<9> oh, 0 is special isn't it?
<9> eval: $n = 1; while (1) { @crap = caller($n++); last unless @crap; push @morecrap, [@crap] } \@morecrap
<7> hobbs: [['P5EvalBot','evalbot.pl',375,'P5EvalBot::__ANON__',1,undef,undef,undef,2,' '],['P5EvalBot','eval.pm',126,'P5EvalBot::safe_execute',1,undef,undef,undef,2,' '],['P5EvalBo
<1> eval: Carp::confess()
<7> mauke: Error: at eval line 1 eval 'no strict; package main; BEGIN{ *CORE::GLOBAL::msgctl = sub {die}; *CORE::GLOBAL::msgget = sub {die}; *CORE::GLOBAL::msgrcv = sub {die}; *CORE::GLOBAL::msgsn
Return to
#perl
or
Go to some related
logs:
virtual_alias_maps should
perl irc accept new_chat
** magic pylint
pyhook x11
#web
#ubuntu
binfmt_0000 modprobe
kentaur porn
xhr keep-alive example
recomnd linux
|
|