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 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 Email Manager Working"; > print substr($line, 105, 16); > } look at what you got out of the error message: a pretty space between 'Working' and "Sleeping" - hence why I of course would avoid trying to substr() and go with a regular expression sequence.... my $found=0 my $target = 'Sleeping for 10'; while(<EMAILMGR>) { # hey you are walking till there anyway... next unless(/$target/); $found++; # increment our found flag last; # bail out of while loop. } # worst case is we walked the file and the line is not there.. if ( $found ) { # we found our prey do it... } else { # life is depressing, the prey got away } ciao drieux --- -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
