Re: [FWP] Oy! Bad Perl

[jeff@yoak.com]

On 29 May, Jeff Boes wrote:
> if ($total_ads == 1) {
>   print qq~
> There is currently <b><font color="#ff0000">$total_ads</font></b>
> $record_singular_lc in this section.<p>~;
> }
> 
> else {
>   print qq~
> There are currently <b><font color="#ff0000">$total_ads</font></b>
> $record_plural_lc in this section.<p>~;
> }
> 
> 
> Talk about going the long way around. Is there a Reverse Golf category?
> 
> (I should point out that the $record_(singular|plural)_lc variables support
> multiple language functionality.)

Even if not the shortest way, perhaps the most fun way would be to
explore the Lingua modules.  I've never had the occasion, but
Lingua::EN::Inflect is supposed to handle pluralization for instance. 
I'm not familiar with the API though...

Cheers,
Jeff

-- 

Jeff Yoak                                     626-705-6996
----------------------------------------------------------

To whom it may concern:
Consider me all signed up. I will be the best beta tester you've ever
seen- I will be the alpha and omega of beta....I will, in fact, be a
master-beta!!
~ Josh Dobbin



==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe