Ken,
The following code used after your search might be useful:
# A regex debug structure.
use English;
if (defined $PREMATCH) {print("PREMATCH = $PREMATCH\n")}
if (defined $MATCH) {print("MATCH = $MATCH\n")}
if (defined $POSTMATCH) {print("POSTMATCH = $PREMATCH\n")
ot;Ken Fox" <[EMAIL PROTECTED]>
To: "Perl-Win32-Users" <[EMAIL PROTECTED]>
Sent: Wednesday, March 27, 2002 15:28
Subject: RE: deterministic regexps (missed something)
> Folks -
>
> $check is not set following the line
> if ($line=~ =~/$meg
Folks -
$check is not set following the line
if ($line=~ =~/$megapat/ ) {
because I am trying to figure this part out -- actually, One of the issues
I am having is that $megapat is currently matching every line in the file...
which is not really what I intende