lanx@nc10-ubuntu:/tmp$ cat end.pl 
print <DATA>;
__END__
end
lanx@nc10-ubuntu:/tmp$ cat data.pl 
print <DATA>;
__DATA__
data