#!/usr/bin/perl

use strict;
use warnings;

my $class = 'Foo';
my $foo = do{ eval "package $class; local \$/; <DATA>"};
print $foo;

package Foo;

__DATA__
Dies
ist
ein
Test
[download]

PerlMonks graciously bestowed by Tim Vroom.
PerlMonks somehow became entangled with The Perl Foundation.
Wonderful Web Servers and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.