The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Acme::POE::Tree - an animated christmas tree

SYNOPSIS

        perl -MAcme::POE::Tree -e 'Acme::POE::Tree->new()->run()'

DESCRIPTION

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.

PUBLIC METHODS

new

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

Run the tree until the user decides they've had enough.

AUTHOR

Rocco Caputo <rcaputo@cpan.org> with debugging and feedback from irc.perl.org channel #poe.

BUG TRACKER

https://rt.cpan.org/Dist/Display.html?Status=Active&Queue=Acme-POE-Tree

REPOSITORY

http://github.com/rcaputo/acme-poe-tree

OTHER RESOURCES

http://search.cpan.org/dist/Acme-POE-Tree/

COPYRIGHT

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.