Help for this page

Select Code to Download

Select or download this

use Lingua::EN::Inflect qw(NUMWORDS);

...
    return $number && $number =~ /^[yt1]/ ? $max_cols : NUMWORDS($max_
+cols);
  }
}

Select or download this

use Lingua::EN::Inflect qw(NUMWORDS);

...
           ################################################### Delete 
+to get rid of Lingua::EN::Inflect
  }
}