Select Code to Download

sub mk_data_accessors3 {
    my $path = shift;
...
mk_data_accessors3('data','bar');

print bar({data=>{bar=>456}}), "\n";  # 456