package main;
use warnings;
use strict;
use Data::Dumper;
print Dumper (Foo->data);