Acme::Time::Asparagus - Time on the vegetable clock
use Acme::Time::Asparagus qw(veggietime);
print veggietime('12:40');
# In version 1.04, you could ask for a particular language, which
# seemed like a good idea at the time, but was very restricting
print veggietime('5:07', 'en_GB');
# Note that this will generate a warning. So you probably don't want
# to do this. But I didn't want to screw people up too badly.
"And now it's time for silly songs with Larry."
Figures out time on the vegetable clock. See http://www.DrBacchus.com/images/clock.jpg See also the README for a URL for a Sushi clock.
I suppose one could consider the very existence of this module to be a bug. Also, I have never been quite sure if that thing was a brussels sprout or a cauliflower.
The input checking could probably be improved.
Some way to convert back to "real" time from vegetable notation.
You're kidding, right? Stop being so silly!
Rich 'DrBacchus' Bowen
CPAN ID: RBOW
rich@DrBacchus.com
http://www.DrBacchus.com/
Kudos to Kate L Pugh for submitting a patch, and demonstrating that there are other people in the world as silly as I am. That stuff has now been moved out into Acme::Time::Aubergine.
See also Acme::Time::FooClock for more information.
Copyright (c) 2009 Rich Bowen. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
print veggietime('5:17');
print veggietime; # defaults to current time
Returns the veggie time equivalent of a 12-hour time expressed in the format hh:mm. Will round to the nearest vegetable.
