http://www.perlmonks.org?node_id=1016463


in reply to Mixing documentation and data

Everything after __DATA__ is considered data.

Have you tried this: 

package FOO::Messages;

sub foo{}

=head1 __DATA__

This is the data stuff here.

=cut

1;
__DATA__

data stuff here.

[download]

In Section Seekers of Perl Wisdom