Servlet

2006-05-30 Thread Tom Allison
How can I impliment a Servlet in Perl without writing my own http server or running apache? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Escaping a plus sign

2006-05-30 Thread John W. Krahn
Paul Nowosielski wrote: > Dear All, Hello, > I have a perl script that runs nightly. It create a data feed. The script > will > die if the is a + sign in the fields its parsing. > > Here is the snippet: > > while (($PKEY, $MGMTCMNT, $manager_id, $MGMTNM, $UPDATE1, $UPDATE2) = > $sth->fetchro

Re: Escaping a plus sign

2006-05-30 Thread Paul Nowosielski
So would this be the correct solution: while (($PKEY, $MGMTCMNT, $manager_id, $MGMTNM, $UPDATE1, $UPDATE2) = $sth->fetchrow_array) { $comment = ""; # added to escape the plus sign $MGMTCMNT = ~ s/\+/\\+/g; $MGMTNM = ~ s/\+/\\+/g; if ($MGMTCMNT =~ /$MGMTN

Re: Escaping a plus sign

2006-05-30 Thread Anthony Ettinger
should probably escape the + sign with \+ $field =~ s/\+/\\+/g; On 5/30/06, Paul Nowosielski <[EMAIL PROTECTED]> wrote: Dear All, I have a perl script that runs nightly. It create a data feed. The script will die if the is a + sign in the fields its parsing. Here is the snippet: while (($PK

Escaping a plus sign

2006-05-30 Thread Paul Nowosielski
Dear All, I have a perl script that runs nightly. It create a data feed. The script will die if the is a + sign in the fields its parsing. Here is the snippet: while (($PKEY, $MGMTCMNT, $manager_id, $MGMTNM, $UPDATE1, $UPDATE2) = $sth->fetchrow_array) { $comment = ""; if ($MGMT

Timing of MainWindow Display

2006-05-30 Thread robert . w . sturdevant
Hi List, I have an app that does a lot of initialization like this: Use Tk: &BuildMainWindow; &Initialize; Mainloop; The problem is that Initialize{} now takes about 20 seconds to start services, etc. and $mw remains unmapped for that time. Is there a way to map $mw as soon as it is

RE: Using Net::SSH::Perl to execute a set of commands

2006-05-30 Thread Oyler, Nathan
Have you installed Math::BigInt::GMP? Might not be it, but I was having a somewhat similar problem that it fixed. > -Original Message- > From: Kelvin Wu [mailto:[EMAIL PROTECTED] > Sent: Monday, May 29, 2006 19:44 PM > To: Perl > Subject: Using Net::SSH::Perl to execute a set of commands

RE: sorting?

2006-05-30 Thread Charles K. Clarkson
Caution: Untested code follows. I don't have an LDAP server to test this, but after reading the rather convoluted docs it looks like there is a sorted() method to help shorten your code a bit. The "attrs" argument in the search() method may define the order in which attrs are returned by

Re: sorting?

2006-05-30 Thread D. Bolliger
Beast am Mittwoch, 31. Mai 2006 12.06: > Beast wrote: > > Hi, > > > > I have some rather big chunk of data, returned from ldap server. The > > format is simple: > > "Displa name" <[EMAIL PROTECTED]> > > > > Simply displying data "as is" is simple, but how do I sorted by > > "display name"? > > pls

Re: sorting?

2006-05-30 Thread Beast
Beast wrote: Hi, I have some rather big chunk of data, returned from ldap server. The format is simple: "Displa name" <[EMAIL PROTECTED]> Simply displying data "as is" is simple, but how do I sorted by "display name"? pls note that "display name" contains space and might not unique so I ca

Re: sorting?

2006-05-30 Thread Chandru
Hi $ cat data "chandru k" <[EMAIL PROTECTED]> "prg " <[EMAIL PROTECTED]> "chandru k" <[EMAIL PROTECTED]> $ cat script.pl #!/usr/bin/perl while(<>) { chomp; ($mail,$name)=split(/\t/,reverse($_),2); $ha{reverse($mail)}=reverse($name); } foreach $k(sort values(%ha)) {

Re: sorting?

2006-05-30 Thread D. Bolliger
Beast am Mittwoch, 31. Mai 2006 07.59: > Hi, Hi > I have some rather big chunk of data, returned How 'returned'? > from ldap server. The > format is simple: > "Displa name" <[EMAIL PROTECTED]> > > Simply displying in the sense of printing to STDOUT? > data "as is" is simple, but how do I s

Russian character support

2006-05-30 Thread SkyBlueshoes
How can I get Russian/other language character support for my script? Is there a certain module? SkyBlueshoes -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Problem moving from Data::Dumper to YAML

2006-05-30 Thread Rob Chanter
Hi List, I'm having a little trouble with YAML. The current version of a script uses Data::Dumper to keep running totals over multiple runs of the script in a nested hash, as well as a couple of arrays to give other programs hints about how to order the data (for, say, graphing). I'd very much lik