##
my $pkg = 'Foo';
my $data_fh = do { no strict 'refs'; *{"${pkg}::DATA"} };
my $foo = do { local $/; <$data_fh> };
##
##
my $pkg = 'Foo';
my $data_fh; { no strict 'refs'; $data_fh = *{"${pkg}::DATA"}; }
my $foo; { local $/; $foo = <$data_fh>; }