Andy Wardley <[EMAIL PROTECTED]> wrote
> Something like this should do the trick:
>
>     $date = ref $date eq 'ARRAY' ? $date : [ split(/\D+/, $date) ];

Never use the value of ref() except in a true/false test.

The correct way to tell if something is an array ref is

        ref $date && UNIVERSAL::isa($date, 'ARRAY')


Mike Guy

Reply via email to