Tom Allison wrote:
> if ($text =~ /(.*?($crlf))\2(.*)/sm) {
>
> Do I read this right?
>
> the '\2' is a repeat character of the second match
> where match \1 is (.*?$crlf) and
> match \2 is $crlf ?
Yes, but you don't really need the capturing parentheses there:
if ( $text =~ /(.*?$crlf)$crlf(.*)/s ) {
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
