package Module::With::Data::Segment;

sub foo { return 1; }
sub data { return <DATA>; }
1;
__DATA__
wibble