| |
| |
| |
|
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 38 39
Comments:
<0> I now managed to work around it by splitting the regex up differently
<0> but it isn't pretty
<0> intrr: print is the righ way
<1> What about a really long look ahead? :)
<1> (That is to keep it in one regex)
<0> Ani-_: past the end of memory ?, I don't think we are running on a 8086
<1> Ikarus, not talking about the memory. Just about rewriting the look back as a look ahead (which obviously involves severlas .*) :)
<0> Ani-_: well, that is roughly what I did
<0> But my memory isn't happy
<2> hallo
<3> DAVEMAN!!!!1!
<4> da da da da dum
<2> Hello Botje :)
<2> Stevie-O, YES!
<4> ;)
<5> my $rug = Wool::Carpet->new(); $rug->sweep(Problem->discover)->under
<4> gah
<4> wtf
<4> xsubpp is borking on me
<6> Hrm. How do I change two blank lines into one blank line with vim? I can never remember.
<3> J
<7> or 'dd' ?
<3> that would work too
<6> %s/\n\n//J?
<6> Oh sorry. I meant in a substitution.
<6> So I can do them all at once.
<6> I was just writing a perl oneliner to do it before Ir ealized I didnt have perl installed on this windows box yet. :p
<8> windows doesnt come with perl preinstalled?
<3> perl -00 -pi -e1
<3> :o)
<6> ;p
<2> :p
<2> fedde :P
<9> I have a question.... Suppose I redefine the stat() function... Is stat(_) supported in any special way?
<9> What of the -f, -r, ... tests?
<10> for a cheap change-control system, I sometimes do "perl -pi-DIST -e0 SomeFileIWillChange"
<9> [OK, so that's actually two questions... :) ]
<10> then it creates SomeFileIWillChange-DIST
<10> so I can keep the dist version around
<2> hi merlyn :)
<11> what is the return of fetchrow_array if SELECT found nothing please? 0? -1?
<2> unknown
<10> Pelerminoctarito - what do the docs say?
<2> I say it could be ANYTHING!
<10> an empty list
<11> merlyn one from dbi.perl.org talk about empty string
<11> yes
<11> what is it...
<10> that's an empty list
<12> merlyn are you still going to perl mongers soon in los angeles?
<11> how to represent empty string
<10> you're supposed to be checking for an empty list
<10> TARANthe - yes la.pm tuesday
<2> roflcopter
<10> unless (my @result = $sth->fetchrow_array) { # nothing returned }
<2> silly merlyn
<12> :)
<11> merlyn i check in that way my @data = him->fetchrow_array(); if (!exists($datab[0]) { print "No line\n"; }
<11> is it ok
<12> thier site still not updated
<12> the bastards
<12> I have www.sugarcrm.com and people are not liking it but all our data is in its mysql 4.1.10 db
<12> what cna I do ?
<12> perhaps bing in perl people to make screen off of its mysql db?
<12> and take corntrol?
<13> yeah
<10> No no
<10> if (@data) { ... }
<10> if there's an empty list response, @data will be empty
<10> so check its length
<10> TARANtheWANDERR - Todd @ ticketmaster is pretty lax about getting the site udpated
<2> Roflopticus!
<13> heh
<14> Hm
<2> HLAFG
<14> Should I take a stegadon or saurus
<15> I did one of these -> read(FILEIN, $buf, 60015);
<15> how can I print out the 3rd byte?
<15> i tried -> print $buf[3];
<14> I need grouch bros stuff
<3> that accesses @buf, not $buf
<16> hey all !
<3> substr $buf,3,0
<3> substr $buf,3,1
<3> rather
<15> Botje, ahh right
<16> im looking for a way to use my perl script to open a URL using POST rather than GET, so that the trailing vars arent displayed to the user going to that URL ... can anyone point me in the right direction ?
<10> generalhan - you want LWP
<16> LWP ?
<14> I don't actually think he does
<16> do you have any references ?
<10> and particularly LWP::UserAgent->post(...)
<16> ok let me try this .....
<10> generalhan - that's in the CPAN
<10> you need to make it installed first
<10> then you can "perldoc LWP::UserAgent"
<15> generalhan, libcurl?
<16> the bottom line is that i have a squid proxy setup and i got tired of trying to fit samba and windows together so i want to make a logon script that runs my perl script with vars that will update my ACLs to reflect the IP addy that a certain user is at so that his ACLs still affect him no matter where he sits
<14> Probably not, no.
<16> but if the user sees the URL as acledit.pl?user-%username%&newip=%ip_address% then he will be able to figure out how to rewrite that so that it will p*** invailid info and his ACL will no longer affect him
<10> "IP addy that a user is at" is naive
<16> i just want to be able to run http://192.168.0.xxx/acledit.pl?user-%username%&newip=%ip_address% but when he sees the URL it only shows "http://192.168.0.xxx/acledit.pl";
<10> presumes 1-1 user v IP
<10> and that's clearly not true
<17> bleadperl -E 'sub f{state($x,$y)=(1,2);++$x;++$y;say"$x $y"} f; f; f' # statics vars make it easier to be evil
<17> now with pretty syntax, even easier
<16> merlyn: i have roaming profiles set up on my Windows AD system ... so if a user moves i NEED that IP address that they are at so that i can update my ACLs so that user "joe" has the same restrictions while he is at .24 as he would at .33
<16> i cant get samba working to join the Windows domain so this is my next option
<16> i just dont want the users seeing the info that i p***, otherwise it wont take them long to figure a way around it
<14> generalhan: But um, how would they see it?
<16> when the logon script runs it it will open a browser window
<16> if i can p*** info to that script on the apache server with out open a browser window ... thats even better
<14> Er, why would you want to open a browser window?
<16> buu: i have a script sitting on my Linux side of the network ... i cant connect the 2 networks so i need a way to p*** info from $M to Linux. so by putting this script on the apache server i can get to it from the other side
<10> generalhan - you are forgetting proxies, like AOL
<16> what do you mean ?
<10> an AOL user looks like they're coming from a different IP on *every* hit
<16> no no
<10> and other proxies make hundreds of users look like they have the same IP
<10> so IP != user
<18> he is doing it for local,private ips it seems
<10> ahh, local users
<16> merlyn: these are all workstation IN my office. i can reference the DHCP address releases so ... IP DOES = user
<10> more control
<10> but in general, you can'tdo that.
<19> hey there3
<18> it's still probably a security hole to use a web cgi to edit access permissions, though, :)
<16> i just want a way that i can use my squid.conf's ACLs to control users no matter which station they chose to sit at
<16> dkr: it is and you are 100% correct
<4> what the hell
<16> but im out of options and if i see one more damn user sitting on myspace.com i will just disable EVERYTHING and not let them even LEFT click on anything ! lol
<19> I asked this a couple hours ago, but I never got a response, so I'll try my luck again.
<19> When creating a module for CPAN, is it common to require an extra module for the purpose of the tests, which serves no function other than to facilitate the tests and isn't required by the actually module being tested?
<14> generalhan: We just send myspace.com to our internal site
<16> lol
<4> xsubpp is borked
<16> buu: but i work in a law firm ... research is VITAL to what some people do here so i need to block EVERYTHING for certain people and certain people get no restrictions
<4> has anyone else noticed this?
<16> i did this by making restricted users USE the proxy and unrestricted users NOT use the proxy
<14> Stevie-O: No?
<18> philomory: sounds like asking for heisenbugs to me
<16> but i want EVERYONE goin though the proxy so i need to get this user thing figured out
<4> buu: Have you compiled anything using XS lately?
<14> Stevie-O: Er, yeah..
<18> generalhan: how about having their bosses make sure they do their work and relax about what site people visit. ;)
<10> why not just give everyone a unique certificate
<10> and then check that in your proxy?
<16> dkr: i wish it was that simple
Return to
#perl
or
Go to some related
logs:
#linux
package.mask madwifi
#web
#asm
#qemu
fluxbox tilda quake
#web
gstreamer-plugin-ugly
#php
dell m70 cpuinfo
|
|