>>>>> "JG" == Jim Gibson <jimsgib...@gmail.com> writes:

  JG> On 3/2/11 Wed  Mar 2, 2011  3:33 PM, "Uri Guttman" <u...@stemsystems.com>
  JG> scribbled:

  >>>>>>> "T" == TaP  <4eversp...@gmail.com> writes:
  >> 
  T> Hi Guys,
  T> I have this script:
  >> 

  T> if ($line =~ /\b([\w_\-\.]+ at [\w_\-\.]+)\b/) {

  JG> The ' at ' in the above line should also be '@'.

my eyeballs missed that one. very odd hiding harmless @'s from
spammers. never seen perl code like that before.

uri

-- 
Uri Guttman  ------  u...@stemsystems.com  --------  http://www.sysarch.com --
-----  Perl Code Review , Architecture, Development, Training, Support ------
---------  Gourmet Hot Cocoa Mix  ----  http://bestfriendscocoa.com ---------

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to