Perl metacharacters

2004-05-29 Thread JJB
I have problems with 2 different if statements that use metacharacters. if (/([EMAIL PROTECTED] )/) { $abuse_email = ${1}; } The data line it's reading looks like this, remarks: Please report all problems to [EMAIL PROTECTED] for probes, port scans etc. print($abuse_email) shows that

Re: Perl metacharacters

2004-05-29 Thread Saint Aardvark the Carpeted
JJB disturbed my sleep to write: if (/([EMAIL PROTECTED] )/) { $abuse_email = ${1}; } [snip] print($abuse_email) shows that it contains [EMAIL PROTECTED] for probes, port scans etc. How do I change the if statement so I only get the [EMAIL PROTECTED] string? You want to minimize how