$ perl -I. -MData::Dumper -MFoo -e'print Dumper (Foo->data)'
Useless use of private hash in void context at Foo.pm line 16.
$VAR1 = {
          'foo' => 'bar'
        };