On Friday, May 24, 2002, at 07:44 , Lance Prais wrote:
> One more question, how can I make it that it is not case sensitive when
> find
> something out of a text doc?
[..]
> next unless(/$target/);
next unless(/$target/i);
perldoc perlre
your f
One more question, how can I make it that it is not case sensitive when find
something out of a text doc?
Thanks
Lance
-Original Message-
From: drieux [mailto:[EMAIL PROTECTED]]
Sent: Thursday, May 23, 2002 4:58 PM
To: Lance Prais
Cc: begin begin
Subject: Re: subsrting question
On
Lance Prais wrote:
>
> Well I am have finally got the code to recognized the right substring but
> not the issue is my if statement. Could someone see what I am doing
> wrong,please.
>
> For example I ran the script and got the following output:
>
> E:\sea621\siebsrvr\BIN\perl\bin>perl emailmg
On Thursday, May 23, 2002, at 02:29 , Lance Prais wrote:
[..]
> For example I ran the script and got the following output:
>
> E:\sea621\siebsrvr\BIN\perl\bin>perl emailmgr.pl
> Successfully Completed Email Manager Working Sleeping for 10
[..]
> else
> {
> print "Successfully Completed Emai
print "Successfully Completed Email Manager Working";
print substr($line, 105, 16);
}
-Original Message-
From: John W. Krahn [mailto:[EMAIL PROTECTED]]
Sent: Thursday, May 23, 2002 4:17 PM
To: [EMAIL PROTECTED]
Subject: Re: subsrting question
Lance Prais wrote:
>
Lance Prais wrote:
>
> I am trying to use the substr() to search a text doc. The starting place
> is 100.
If you want to _search_ for a string you should be using index(),
rindex() or a regular expression.
> I am trying to test to see if "Sleeping for 10" is there.
>
> This is the code I
On Thursday, May 23, 2002, at 12:04 , Lance Prais wrote:
> I am trying to use the substr() to search a text doc. The starting place
> is 100.
>
> I am trying to test to see if "Sleeping for 10" is there.
>
> This is the code I am trying to use substr($line 100,16) but is only
> returning "
Hi - this script works for me:
use strict;
use warnings;
# make dummy input for test
my $line = "x" x 100 . "Sleeping for 10" . "x" x 100;
print substr($line, 97,21), "\n"; # print extra to test
print substr($line, 100,15), "\n"; # just print it
# note comma required after $line, and length i
