—
—
—

              
# $Id: Note.pm,v 1.1 2000/09/01 11:50:02 perlbug Exp perlbug $ 
HideShow 6 lines of Pod
=head1 NAME
Perlbug::Test - Perlbug test module placeholder
=cut
package Perlbug::Test;
BEGIN { $|=1; }
use Data::Dumper;
use Exporter;
use Test;
use File::Spec; 
use lib File::Spec->updir;
use strict;
use vars qw($VERSION);
$VERSION = 1.01
HideShow 23 lines of Pod
=head1 DESCRIPTION
x
=head1 SYNOPSIS
    y
         
=head1 METHODS
=over 4
=item new
Create new Perlbug::Test object:
    my $o_test = Perlbug::Test->new();                               # generic
        my $o_email_test = Perlbug::Test->new('Email'); # guess :-)
=cut
sub new {
    my $class = shift;
        my $self  = {};
    bless($self, $class);
}
HideShow 8 lines of Pod
=back
=head1 AUTHOR
Richard Foley perlbug@rfi.net 2000
=cut
# 
1;