print Dumper($ref), "\n";