[prev in list] [next in list] [prev in thread] [next in thread] 

List:       apache-modperl
Subject:    Re: regex quickie
From:       Andy Armstrong <andy () hexten ! net>
Date:       2007-04-26 19:06:34
Message-ID: A583A928-403A-494B-8E51-48D29FB91F4C () hexten ! net
[Download RAW message or body]

On 26 Apr 2007, at 20:04, John ORourke wrote:

> Come on people, someone's gotta do this for a laugh...
>
> &{"do_".lc(($r->uri()=~/(\w+)\.com\//i))}();
>
> sub AUTOLOAD { return undef; }
> sub do_google { }
> sub do_yahoo { }

Nice :)

-- 
Andy Armstrong, hexten.net

[prev in list] [next in list] [prev in thread] [next in thread]