[MacPerl] - Regep question

[Chris Brinegar <design@netpass.com>]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Hello everyone,

     Would some kind soul be so kind as to give a struggling programmer a
hand??? :)

     I'm trying to modify a perlscript to do a search with no luck...

     I've had luck with most of it but the last elsif regep search is 
really
not being nice... (I've been fighting with it for over an hour...)

I've read all the man pages I can digest.. with no luck...

This is what I've ended up with...

(snip)

while (<>) {
  if (/\Q<\/font><\/font><\/form>\E/) {
    $puts = 1;
  }
  elsif (/(?s)\Q<br>\E\n\n\Q<br>\E\n/) {
   $puts = 0;
  }

(end snip)

The first if statement seems to be working fine... but the next line is 
giving
me the trouble...

what I'm searching for is 

"<br>(newline)(newline)<br>(newline)"

somebody smack me in the head and tell me what I'm doing wrong...

thanks a bunch in advance...

- -----------------------------
Chris Brinegar

design@netpass.com
NetPassage, Inc.
Design Team

<< Message Signed at 12:59 EST Friday, June 13, 1997 >>


     There are only three types of computer users. 

     Those that use Macs. 
     Those that wished they used Macs. 
     Those that don't know any better.

- -----------------------------
PGP key:
pub  1024/E9D2EFDD 1997/06/03 Chris Brinegar <design@netpass.com>
Key fingerprint =  F1 6A 53 EA E1 0D C0 1D  A6 5C BF 78 D4 C8 D8 EB  E9 
D2 EF
DD
- -----------------------------


-----BEGIN PGP SIGNATURE-----
Version: PGP for Personal Privacy 5.0
Charset: noconv

iQA/AwUBM6F8c9TI2Ovp0u/dEQJKWwCfR6tuCUa+TfBtmmfy9tWJmAvYsA8AnAsu
R94Rf8ApgBuxyixEuwrlN+eh
=jJOP
-----END PGP SIGNATURE-----

***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch