Acme::POE::Tree - an animated christmas tree
perl -MAcme::POE::Tree -e 'Acme::POE::Tree->new()->run()'
Acme::POE::Tree uses IO::Tty to learn the current terminal size, Curses to fill the terminal with a colorful Christmas tree, and POE to animate the lights.
Create a new Acme::POE::Tree application. The light and star animation delays may be set here. The tree may also be set to exit automatically after a short amount of time:
use Acme::POE::Tree; my $tree = Acme::POE::Tree->new( { star_delay => 1.5, # shimmer star every 1.5 sec light_delay => 2, # twinkle lights every 2 sec run_for => 10, # automatically exit after 10 sec } ); $tree->run();
Run the tree until the user decides they've had enough.
Rocco Caputo <rcaputo@cpan.org> with debugging and feedback from irc.perl.org channel #poe.
https://rt.cpan.org/Dist/Display.html?Status=Active&Queue=Acme-POE-Tree
http://github.com/rcaputo/acme-poe-tree
http://search.cpan.org/dist/Acme-POE-Tree/
Copyright (c) 2008-2010, Rocco Caputo. All Rights Reserved. This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.
To install Acme::POE::Tree, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Acme::POE::Tree
CPAN shell
perl -MCPAN -e shell install Acme::POE::Tree
For more information on module installation, please visit the detailed CPAN module installation guide.