How to bind values in "IN" value

2006-06-10 Thread Anish Kumar K.
Hi I need help as how to bin the values for the IN Query, Assume there are 3 userid and I make a string line ?,?,? in the IN query my @userid=('1','2','3'); say at first I prepare a query and store this in variable "$result"; my $query="select name from person where userid IN(?,?,?); my $resul

Network bandwidth throttling...?

2006-06-10 Thread Michael
Anyone know how this is typically done? Anyone have a link to information on how one might do this? Anyone know if this has been done in a Perl project somewhere? Regards, -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Yet another OO question

2006-06-10 Thread Lawrence Statton
Shawn wrote: > > > > I would prefer it to return the old value: > > > > > > > > sub foo { > > > > my $self = shift; > > > > my $old_foo = $self->{'foo'}; > > > > $self->{'foo'} = shift if @_ > 0; > > > > return $old_foo; > > > > } > > > > > > > > Someone asked: (Sorry, I've lost the attr

Re: Network bandwidth throttling...?

2006-06-10 Thread Randal L. Schwartz
> "Michael" == Michael <[EMAIL PROTECTED]> writes: Michael> Anyone know how this is typically done? Anyone have a link to Michael> information on how one might do this? Anyone know if this has been Michael> done in a Perl project somewhere? "throttling your web server" at http://www.sto

distance based grouping

2006-06-10 Thread Saurabh Singhvi
Hi all, I have a set of points in 3d space. What would be the most efficient method of grouping them, based on their a fixed radius of the cluster (of the points). For eg. If points 1,2,3 lie in the same group, then they should be within a fixed radius in the 3d space, which can be manually spec

plugins

2006-06-10 Thread OROSZI Balázs
Hi! How could I implement a system in Perl, in which portions of code (plugins) are loaded dynamically from a given location, and then executed? Lets assume I have a main program main.pl and it is loading the plugins from a given directory, with names like plugin1.plug, etc., that are also per

Re: Yet another OO question

2006-06-10 Thread Paul Johnson
On Fri, Jun 09, 2006 at 09:18:22AM -0700, Lawrence Statton wrote: > Our local style guide bans the > use of for without an explicit index variable Every style guide should have a rule that says "break these rules if you consider it sensible to do so, but be

Re: plugins

2006-06-10 Thread Tom Phoenix
On 6/10/06, OROSZI Balázs <[EMAIL PROTECTED]> wrote: How could I implement a system in Perl, in which portions of code (plugins) are loaded dynamically from a given location, and then executed? You could use modules. The task is quite simple, all I want the plugins to do is that they get som

Re: Yet another OO question

2006-06-10 Thread JupiterHost.Net
Paul Johnson wrote: Astute readers may recognise the rules I am attempting to use. Damian Conway's Perl best Practices, *everyone* should own this book :) Mr. Johnson just got a few more points in my book ;p -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMA

Re: plugins

2006-06-10 Thread OROSZI Balázs
Tom Phoenix wrote: You could use modules. I don't know how to write them and load dynamically. I load things with "use" at the beginning of a program, are modules loaded that way too? Can I use "use" in the middle of a program? Can you point me in some direction where I can begin learning a

Re: plugins

2006-06-10 Thread OROSZI Balázs
Hi again! According to this documentation: http://world.std.com/~swmcd/steven/perl/module_mechanics.html modules seem to me like static libraries in C. And it looks way too complicated with makefiles and locations and whatever. This is not what I want, I think. -- Greetings, Balázs -- To un

Re: plugins

2006-06-10 Thread Tom Phoenix
On 6/10/06, OROSZI Balázs <[EMAIL PROTECTED]> wrote: Can I use "use" in the middle of a program? Yes; but I don't think that's quite what you actually want. You probably want to use the require function inside an eval block. Both use and require are documented in the perlfunc manpage. Cheers!

Re: Re: Network bandwidth throttling...? @ 1149979267

2006-06-10 Thread Johan Meskens CS3 jmcs3
Intrah onat Diria .. 10 Jun 2006 10:56:06 -0700 , ** wrote "Revera y": > Hard to find a topic I haven't written on yet. :) what about " the dependency of god on the interpolation of matter in the universe " ? the following could be unreadable @ 1149979648 :::

Re: Network bandwidth throttling...? @ 1149979267

2006-06-10 Thread Paul Johnson
On Sun, Jun 11, 2006 at 12:47:29AM +0200, Johan Meskens CS3 jmcs3 wrote: > To: beginners@perl.org > From: Johan Meskens CS3 jmcs3 <[EMAIL PROTECTED]> > Subject: Re: Re: Network bandwidth throttling...? @ 1149979267 > Date: Sun, 11 Jun 2006 00:47:29 +0200 > X-Space1: | | > X-try: axiniatrixthe

another clamstats.pl question

2006-06-10 Thread Chris
In this script the author has it collecting stats by date, hour, month and year. The only one of these thats not working correctly is by year: By Year ( . = 4 viruses ) --      2:     90 .. The same is with the html output. On the authors page his ha

Re: How to bind values in "IN" value

2006-06-10 Thread Anthony Ettinger
$result->execute(@$userid); You declared an array @userid, not an arrayref, so you don't need to dereference it. $result->execute(@userid); should do the trick. -- Anthony Ettinger Signature: http://chovy.dyndns.org/hcard.html -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional comma

Re: Problem installing captcha

2006-06-10 Thread Anthony Ettinger
On 6/4/06, maillists <[EMAIL PROTECTED]> wrote: Hi, I am trying to install Authen::Captcha on a Redhat 9 box and I am a bit of a newby on this... This is the error that I have encountered: Any advise will be very appreciated! Here are the last few lines from my install Authen::Captcha command:

Can't locate Carp/Heavy.pm

2006-06-10 Thread Vijay Kumar Adhikari
I am getting this error: Can't locate Carp/Heavy.pm in @INC (@INC contains: /usr/local/lib/perl5/5.8.3/sun4-solaris /usr/local/lib/perl5/5.8.3 /usr/local/lib/perl5/site_perl/5.8.3/sun4-solaris /usr/local/lib/perl5/site_perl/5.8.3 /usr/local/lib/perl5/site_perl .) at /usr/local/lib/perl5/5.8.3/Carp