On Dec 5, Mark Anderson said:

>               if ($str =~ /@A(.*?)@B(.*?)@C(.*?)@D(.*?)@E(.*?)@F(.*?)@END/s) {
>                       $var1 = $1; $var2 = $2; ...
>               } else {
>                       print "Error message";
>               }
>
>And it's stuffing most of $str into a single $varX, and I'm not finding the
>rest of $str.  Do I need to be escaping my @'s in my regular expression?

Yup.  You could have tested that.  I also have a feeling you're not using
warnings NOR strict.

-- 
Jeff "japhy" Pinyan      [EMAIL PROTECTED]      http://www.pobox.com/~japhy/
RPI Acacia brother #734   http://www.perlmonks.org/   http://www.cpan.org/
** Look for "Regular Expressions in Perl" published by Manning, in 2002 **


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to