The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Clash::Stub::Plugins::Beta;
#                                doom@kzsu.stanford.edu
#                                14 May 2007


=head1 NAME

Clash::Stub::Plugins::Beta - stub module defines methods to be exported

=head1 SYNOPSIS

   use Module::List::Pluggable qw(:all);
   my $plugin_root = 'Clash::Stub::Plugins';
   import_modules( $plugin_root );

=head1 DESCRIPTION

Stub for testing Module::List::Pluggable.

=head2 EXPORT

All subs:

  much_bupkes
  accidents_happen

=cut

use 5.006;
use strict;
use warnings;
my $DEBUG = 1;
use Carp;
use Data::Dumper;

require Exporter;

our @ISA = qw(Exporter);
our @EXPORT = qw(
  much_bupkes
  accidents_happen
 );

our $VERSION = '0.01';

sub much_bupkes {
  my $self = shift;  # right?
  return "And whadaya get?";
}


sub accidents_happen {
  my $self = shift;  # right?
  my $something =<<STUFF;
    foal shoals and soverign peas a-slow,
    our fathead, who arts for arts sake,
    stacked forth and perled two...
STUFF
  return $something;
}



1;

=head1 SEE ALSO

L<Module::List::Pluggable>

=head1 AUTHOR

Joseph Brenner, E<lt>doom@kzsu.stanford.eduE<gt>

=head1 COPYRIGHT AND LICENSE

Copyright (C) 2007 by Joseph Brenner

This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.8.2 or,
at your option, any later version of Perl 5 you may have available.

=head1 BUGS

None reported... yet.

=cut