Rajarshi Das wrote:
I posted it on all three lists assuming that the audience in all the
three are different and higher the chances that someone posts a reply.
Please let me know if this is an incorrect assumption, and also if this
qn specifically is outside the scope of the beginners mailing l
I posted it on all three lists assuming that the audience in all the three
are different and higher the chances that someone posts a reply. Please let
me know if this is an incorrect assumption, and also if this qn specifically
is outside the scope of the beginners mailing list (or all ebcdic re
> "Ramprasad" == Ramprasad A Padmanabhan <[EMAIL PROTECTED]> writes:
Ramprasad> $exp->expect(1);
This means "wait at most 1 second for *any* output".
Do you really want to do that? Perhaps you should be waiting for a
newline or something.
--
Randal L. Schwartz - Stonehenge Consulting Serv
Greetings
I am a little problem that I just can't figure out at this stage. Please see
the following code:
#!/bin/perl
#
#
#
use strict;
use BerkeleyDB;
my $password = "password1";
my $base = "/test";
my $log_file = $base . "/log/db.log";
my $db_filename = $base . "/joe.db";
my $db_env = new
Karyn Williams wrote:
At 07:42 AM 6/15/05 -0700, you wrote:
Karyn Williams wrote:
Also,
there are just a handful of files BUT they are ever changing, so I would
like to not list the statically in the code.
but this would work:
chomp( my @lists = qx(ls /usr/local/dir) );
But this would
At 07:42 AM 6/15/05 -0700, you wrote:
>Karyn Williams wrote:
>> Also,
>> there are just a handful of files BUT they are ever changing, so I would
>> like to not list the statically in the code.
>>
>but this would work:
>
>chomp( my @lists = qx(ls /usr/local/dir) );
>
>But this would work a lot
I am using perl Expect to spawn a shell, run date and get its output ..
I am not getting the full output of date
Here is the script, can someone tell me where am I going wrong ?
#!/usr/bin/perl
use Expect;
my $exp = Expect->spawn('bash');
print $exp->send("date\r");
$exp->expect(1);
my $str =
Karyn Williams wrote:
[snip]
So, first question is why is this happenning ? Then how do I fix it ?
What is happening that you didn't want to happen? What is NOT happening that
you did want to happen?
http://www.catb.org/~esr/faqs/smart-questions.html
Also,
there are just a handful of
On 6/14/05, Karyn Williams <[EMAIL PROTECTED]> wrote:
> Below is code that I found on the web that I slightly modified. I am trying
> to create a script to remove from a file (tlist) the items in another file
> (tnames). This works but I have multiple files (tlist) I need to check
> against. I'm no
On 6/14/05, Praedor Atrebates <[EMAIL PROTECTED]> wrote:
> On Tuesday 14 June 2005 16:37, Wagner, David --- Senior Programmer Analyst ---
> WGO wrote:
> [...]
> > > I have this (pertinent) code in my script:
> > >
> > > $dnakmotif ='[KRH][L{3,}V{3,}I{3,}F{3,}Y{3,}A{3,}][KRH];
> >
> > $dnakmo
On Wednesday 15 June 2005 09:16 am, Sugrue, Sean wrote:
> There is a program called a regular expression coach
> http://www.weitz.de/regex-coach/ which is a big help with difficult
> Expressions.
[...]
Thank you! I'll take a look.
> When you say "a series ... 3 to 5 characters in length", do you
There is a program called a regular expression coach
http://www.weitz.de/regex-coach/ which is a big help with difficult
Expressions.
-Original Message-
From: Tim Johnson [mailto:[EMAIL PROTECTED]
Sent: Tuesday, June 14, 2005 7:34 PM
To: Praedor Atrebates; Wagner, David --- Senior Progra
Rajarshi Das wrote:
Hi,
Following is a snapshot of a bareword test :
--
use utf8;
my %hash = (те => 123);
is($hash{те}, $hash{'те'});
---
It runs on ascii and passes but fails on ebcdic (z/OS, ibm-1047) with
perl-5.8.6.
The above two barewords (т
Hi,
Following is a snapshot of a bareword test :
--
use utf8;
my %hash = (те => 123);
is($hash{те}, $hash{'те'});
---
It runs on ascii and passes but fails on ebcdic (z/OS, ibm-1047) with
perl-5.8.6.
The above two barewords (т and е) which make up
14 matches
Mail list logo