--- Phil Carmody <[EMAIL PROTECTED]> wrote:
> Do any of you gurus have anything to say about the
> regexp shootout at:
>  
>
http://www.bagley.org/~doug/shootout/bench/regexmatch/
> including the perl contender:
>  
>
http://www.bagley.org/~doug/shootout/bench/regexmatch/regexmatch.perl
> ?

I couldn't understand what's the purpose of the
shootout? Performance? Character count?

#!perl -nl
y/ ()-//d;
/(?:^|\D)(\d{3})(\d{3})(\d{4})(?=\D|$)/ && print "($1)
$2-$3";

--Ala


__________________________________
Do you Yahoo!?
Yahoo! SiteBuilder - Free, easy-to-use web site design software
http://sitebuilder.yahoo.com

Reply via email to