=head1 NAME Acme::RandomQuote::Base - The great new Acme::RandomQuote::Base! =head1 VERSION Version 0.01 =head1 SYNOPSIS use Acme::RandomQuote::Base; my $foo = Acme::RandomQuote::Base->new( 'file' ); print $foo->get_random_quote(); =head2 new Creates a new Acme::RandomQuote::Base object. my $foo = Acme::RandomQuote::Base->new( 'file' ); =head2 get_random_quote Returns a random line from the selected file. print $foo->get_random_quote(); =head1 AUTHOR Diogo Neves, C<< >> =head1 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. =cut