Re: Moving Data from one table to another table

On Tue, 28 Dec 2004, Chris Lyon wrote: > So, I am trying to move data from one sql table to another table > called logs_archive. It seems that I am running into some problems > with memory as I am moving this much data from one table to another. > This is just syslog data but we need to archive

Moving Data from one table to another table

Maybe this is a little OT but since I am a beginner @ perl, I thought that I would post it! So, I am trying to move data from one sql table to another table called logs_archive. It seems that I am running into some problems with memory as I am moving this much data from one table to another. Th

How to throw exceptions for perl cgi program?

I'm buffering my html/javascript output in a large array of strings. This frees me to perform my computations independently of the order they appear in the output. However, I have a problem: Let us suppose I have an error from my database and I have not executed "print $q->header( ),start_html(-ti

Re: Can someone translate a small .PY to Perl?

> "Andrew" == Andrew Gaffney <[EMAIL PROTECTED]> writes: Andrew> It works for me. That's the way I'd seen it done when I was learning Andrew> bash. I believe the while checks the return value, not the output of Andrew> the command. That's a bash-ism then, not The One True Shell. I was using

Re: Can someone translate a small .PY to Perl?

> was wondering if there were a translation in PERL so I could have my Netware > servers send heartbeats to the heartbeat server? > > Title: PyHeartbeat - detecting inactive computers > Submitter: Nicola Larosa > > # Filename: HeartbeatClient.py > > """Heartbeat client, s

RE: Can someone translate a small .PY to Perl?

> > Or more commonly: > > > > while :; do > > ... > > done > > > > because the ":" command is true. > > It works for me. That's the way I'd seen it done when I was > learning bash. I > believe the while checks the return value, not the output of > the command.

Re: Why a program ran with mod_perl runs slower?

"Octavian Rasnita" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED] > Hi all, > > I have tried testing mod_perl with the following script: > > my $begin = (times)[0]; > print "Content-type: text/html\n\n"; > > sub fib { > $_[0] < 2 ? return $_[0] : return fib($_[0] - 1) + fib($_[0] - 2)

Password Encryption

Hello, Been trying to figure out how to encrypt a password w/Perl so it's uses the same scheme used in a webmin control panel for password protecting directories. It says it's the MD5 method, but I have tried serveral variations using the MD5 and Digest::MD5 but can't seem to find the correct fo

Re: to check directory permission and owner

Chandrakant Reddy wrote: Hi Hello, I wrote this script but don't know how to get the owner of that directory !! #!/usr/bin/perl use strict ; use warnings ; while ( my $line = ) { my @array = split(":",$line) ; my $loginid = $array[0] ; my $uid = $array[2]; my $guid =

Re: Use of uninitialized value in String

Yes...Thanks for the reply..It worked Thanks Anish - Original Message - From: "Ing. Branislav Gerzo" <[EMAIL PROTECTED]> To: Sent: Wednesday, December 29, 2004 4:43 PM Subject: Re: Use of uninitialized value in String > Anish Kumar K. [AKK], on Tuesday, December 28, 2004 at 16:37

Re: Use of uninitialized value in String

Anish Kumar K. [AKK], on Tuesday, December 28, 2004 at 16:37 (+0530) wrote about: AKK> 6: if ($browserName eq "") unless ($browserName) { ... I think you have null value in db. -- ...m8s, cu l8r, Brano. [Kids love the rich taste of titanium - Joel] -- To unsubscribe, e-mail: [EMAIL PRO

Use of uninitialized value in String

I am getting this error not sure why Use of uninitialized value in string eq at line :6 1: $rows=$dbh->prepare("select browsername from course where clientname ='DEMO"); 2: $rows->execute(); 3: while(@row=$rows->fetchrow_array()) 4: { 5: $browserName=shift(@row); 6: if ($browserName eq

CPAN Shell

I did a "r" which gives me "reinstall recommendations". It does spit out a list of modules. Do I use "recompile" to batch update those? Robert -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: to check directory permission and owner

Hi I wrote this script but don't know how to get the owner of that directory !! #!/usr/bin/perl use strict ; use warnings ; while ( my $line = ) { my @array = split(":",$line) ; my $loginid = $array[0] ; my $uid = $array[2]; my $guid = $array[3]; my $dir = $