#!/usr/bin/perl

use strict;

package MyModule;

=pod

=head1 MyModule

=head2 My data is:

=cut

my $testread = join '', <DATA>;
warn $testread;

__DATA__

=pod

one == 1

two == 2

=cut