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

NAME

Acme::RandomQuote::Base - The great new Acme::RandomQuote::Base!

VERSION

Version 0.01

SYNOPSIS

    use Acme::RandomQuote::Base;

    my $foo = Acme::RandomQuote::Base->new( 'file' );

    print $foo->get_random_quote();

new

Creates a new Acme::RandomQuote::Base object.

    my $foo = Acme::RandomQuote::Base->new( 'file' );

get_random_quote

Returns a random line from the selected file.

    print $foo->get_random_quote();

AUTHOR

Diogo Neves, <dafneves at mangaru.net>

COPYRIGHT & LICENSE

Copyright 2008 Diogo Neves, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.